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Abstract 


EKG  data  compression  techniques  were  investigated  for 
potential  real  time  implementation  on  an  8  bit  Motorola  6800 
microprocessor.  Research  indicated  entropy  reduction 
transform  techniques  such  as  the  Fast  Fourier  Transform  and 
the  discrete  Karhunen-Loeve  Transform  were  not  feasible  for 
implementation  on  the  6800.  Two  redundancy  reduction  (RR) 
techniques  (TOLAN  and  DOWER)  utilizing  2nd  order  difference 
operations  in  conjunction  with  variable  length  encoding  were 
studied  in  detail.  One  such  RR  technique  (TOLAN)  was  fully 
implemented  and  tested  with  ''in  vivo''  EKG  data.  Analysis 
revealed  compression  ratios  ranging  from  1.25:1  to  2.26:1. 
Investigation  of  the  poor  performance  of  the  compression 
algorithm  showed  significant  degradation  of  the  2nd  order 
difference  '  'decorrelator'  1  due  to  a  noisy  collection 
environment.  It  was  concluded  that  real  time  EKG  data 
compression  is  feasible  on  the  6800  but  that  time  compression 
techniques  which  store  a  zero  value  sequence  counter  versus 
the  value  of  zero  are  not  efficient  in  a  high  noise 


env ironment . 


ANALYSIS  AND  PF  RFORMANTF  EVALUATION 
OF  F.LLCTROCARD1  OOIIAM  DATA  COMPRESSION  TFCHNIOFFS 

I .  Introduction 

nd 

Currently  the  USAF  School  of  Aerospace  Medicine 
(USAFSAM)  is  receiving  more  than  thirty  thousand 
electrocardiogram  (EKG)  data  records  a  year  from  Air  Force 
flight  personnel  worldwide.  This  data  is  presently  recorded 
on  paper  strip  charts  for  immediate  medical  analysis  and 
long  term  storage  (via  microfilm). 

Advances  in  computerized  biomedical  analysis  has 
generated  a  need  for  digitized  storage  of  the  EKG  waveform 
to  allow  computerized  interpretation  and  comparison  of 
present  and  past  cardiographic  data.  As  computerized 
diagnosis  becomes  more  accurate,  a  long  term  digital  record 
of  historical  EKG  data  will  enable  the  cardiology  staff  at 
USAFSAM  to  identify  developing  heart  disease  before  it 
becomes  a  danger  to  a  flight  crew  member  or  his  fellow 
c  r  ewma  n . 

Data  £om£_r  £  jo  n  of  the  sampled  EKG  has  been  an  area  of 
active  research  since  the  late  nineteen  sixties.  References 
(1),  (7),  (12),  (26),  (28),  (29).  (32),  (3  3  ),  and  (3  5)  are 
representative  of  the  research  efforts  performed  in  the  last 
ten  years.  The  reasons  for  compressing  EKG  data  arc 
twofold:  1)  digital  storage  costs  are  rapidly  approaching 
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analog  storage  costs  and  ;  2)  increased  use  of  computer 
aided  diagnosis  requires  large  digital  data  bases. 

In  the  past,  EKG  data  compression  has  generally  been 
performed  at  a  central  computer  facility.  The  data  is 
normally  collected  in  a  physician's  office  or  clinic  and 
transmitted  in  an  analog  format  over  a  standard  telephone 
link  to  the  central  computer.  The  data  is  then  digitized 
and  input  to  a  computer  for  diagnosis  and  storage  (in 
compressed  form)  . 

With  the  current  advances  in  microprocessor  technology, 
mp  J_  j.  n  and  comgte  s  s_ion  at  the  collection  site  is  now  a 
viable  alternative.  State  of  the  art  digital  communication 
systems  can  operate  at  9600  bits  per  second  over  the 
standard  3  kilohertz  (KHz)  bandwidth  telephone  channel. 
With  error  detection  and  correction  protocols  (Ref  27),  high 
fidelity  digital  transmission  of  the  compressed  EKG  to  the 
central  processing  center  appears  to  be  the  wave  of  the 
future  (Ref  21:253-254). 

The  Department  of  Defense  (DOD)  is  currently  installing 
a  computerized  EKG  interpretation  system  at  centralized  US 
military  medical  centers  worldwide.  To  collect  and  transmit 
this  EKG  data,  remote  medical  clinics  will  use  a  commercial 
EKG  1  '  cart  "  containing  a  Motorola  6800  microprocessor. 
This  EKG  cart  performs  internal  data  compression,  record 
formatting,  and  error  protective  ''channel''  encoding  for 
d.ijl.i.ta.1  transmission  to  the  central  medical  center. 

As  an  independent  study,  USAFSAM  has  sponsored  this 
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thesis  to  investigate  the  general  field  of  microprocessor 
based  !'  k  (  data  compression.  The  results  of  this  study  are 
to  be  used  for  comparison  against  the  data  compression 
achieved  in  the  DOD  system  and  to  create  a  measurement 
baseline  to  evaluate  future  microcomputer  based  EKG  data 
compression  systems. 

Problem 

The  problem  addressed  by  this  thesis  was  the  analysis 
of  currently  available  EKG  data  compression  algorithms  for 
implementation  in  a  microprocessor  based  computational 
enviroment.  Additionally,  a  performance  measure  was  to  be 
developed  by  which  differing  EKG  data  compression  techniques 
could  be  compared. 

Sc  o^e 

In  this  thesis,  an  EKG  Data  Acquistion  and  Analysis 
System  (EKG-DAAS)  was  constructed.  The  EKG-DAAS  collects  3 
leads  of  an  amplified  EKG  (  i  .  e  .  ,  Analog/Digital  (A/D) 
dynamic  range  =+  5  volts),  and  samples  the  data  at  a 
operator  controlled  rate  between  300-700  hertz.  Data  is 
digitized  at  12  bit  precision  and  subsequently  roiin^ld  to  8 
bits  for  uniform  truncation  error  performance  (Ref 
24 : 413-418)  . 

The  EKG-DAAS  hardware  was  developed  around  a  Motorola 
Exorciser  microcomputer  (6800  microprocessor)  with 


associated  A/D  converter,  disk  memory , comput e r  terminal,  and 


hard  copy  printer.  The  EKG-DAAS  hardware  is  controlled  via 
software  program  called  F.  !,'(■- !  M-C .  TEG-EXEC  is  an  a^jie-Fjy 

ilMSlA®  program  which  performs  terminal,  printer,  and  disk 
input/output  (I/O)  operations  as  well  as  providing  a 
supporting  structure  for  the  data  compression  and  analysis 
software.  Because  of  the  lack  of  a  high  order  language 
(e.g.  FORTRAN,  PASCAL,  etc.)  and  the  desire  for  maximum 
program  execution  speed,  a.1.1.  programming  done  in  this  thesis 
is  in  assembly  language.  This  has  proven  to  be  a  major 
limitation. 

Only  one  EKG  data  compression  algorithm  was  completed 
and  implemented  on  the  EKG-DAAS.  *  '  In  vivo''  EKG  data  was 
taken,  however,  and  EKG  data  compression  performance 
analyzed  . 

Gj;  nje  r  a. X  App_r  o ji£h 

To  accomplish  the  objectives  in  the  problem  statement, 
the  literature  was  first  searched  for  EKG  compression 
algorithms  whose  implementation  and  execution  on  a  6800 
microprocessor  was  considered  feasible.  As  a  result  of  this 
literature  search  and  private  correspondence  (Ref  11  and 
31),  two  compression  routines  were  found.  These  two  EKG 
data  compression  algorithms  will  hereafter  be  referred  to  as 
the  Tolan  and  Dower  methods  (Ref  31,12)  . 

With  the  Tolan  and  Dower  algorithms  identified, 
construction  of  the  EKG-DAAS  was  begun  by  assembling  the 
data  acquistion  subsystem.  This  data  acquistion  system 
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consists  of  an  Analog/Digital  converter  and  a  interrupt 
s  a  - .  •  i  n  g  clock.  The  A/D  was  calibrated  and  coding  of  the 
EKG-EXEC  software  started.  Several  non^t  hs  of  effort 
resulted  in  the  EKG-EXEC  software  and  programming  of  the 
Tolan  compression  algorithm  initiated.  Upon  completion  of 
the  Tolan  compression  routines,  the  Dower  algorithm  was 
analyzed  but  not  implemented. 

Based  on  the  results  of  the  Tolan  compression 
algorithm,  a  performance  measure  was  formulated  which 
compares  ££h_i.ev.ed  c  omgr  e  s  s  j.on  against  an  approximate  nasinun 
computed  from  the  data  statistics.  The  Dower 
compression  algorithm  was  analyzed  for  similarity  with  the 
Tolan  technique  and  an  estimated  performance  figure 
calculated  with  respect  to  the  compression  measure  or 
"metric". 

o_f  Pr££e  n_t  ai£_i  ££ 

Chapter  2  begins  the  thesis  development  with  a  general 
survey  of  the  field  of  data  compression.  Data  compression 
is  shown  to  be  divided  into  two  subclasses  (Entropy 
Reduction  and  Redundancy  Reduction)  and  each  subclass  is 
defined.  Several  EKG  compression  techniques  found  in  the 
literature  were  included  in  the  ER  category.  These  ER 
techniques  were  described  and  their  performance  advantages 
and  limitations  analyzed.  Chapter  2  proceeds  by  describing 
redundancy  reduction  and  several  RR  electrocardiogram 
compression  algorithms  are  also  analyzed.  Chapter  2 
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concludes  with  the  determination  that  implementation  of  the 
identified  E  R  compression  routines  would  require  program  r.  i  r.  r 
efforts  beyond  the  scope  of  this  thesis.  Hence  this  thesis 
is  limited  to  redundancy  reduction  compression. 

Chapter  3  describes,  in  detail,  the  Tolan  and  Dower 
redundancy  reduction  algorithms  whose  implementation  on  the 
Exorciser  was  considered  feasible.  The  Tolan  algorithm  is 
described  first  followed  by  a  discussion  of  the  Dower 
method.  Two  other  EKG  compression  techniques,  discovered 
during  the  research  of  this  thesis,  are  also  summarized. 

Chapter  4  reviews  the  hardware  and  software 
configuration  of  the  EKG-DAAS.  The  hardware  system  is 
described  first  and  the  specifications  of  the  Exorciser 
microcomputer, A/D  converter,  and  I/O  peripherals  are 
presented.  Following  the  hardware  description,  the  EKG-EXEC 
program  is  documented  and  the  software  design  philosphy 
examined.  Finally  the  Tolan  compression  module  is 
discussed. 

Chapter  5  outlines  the  r„e.su.l  t..s  obtained  using  the 
EKG-DAAS  with  the  Tolan  algorithm.  A  detailed  description 
of  the  experimental  setup  is  presented  along  with  a 
discussion  of  the  p.er  X2£S1.11£  e.  £  jar  Jl  ®  measured  by 
EKG-EXEC.  Finally  a  performance  metric  is  described  and  the 
Tolan  compression  results  compared  against  this  metric. 
Chapter  five  ends  with  an  analysis  of  how  well  the  Dower 
compression  technique  would  have  performed  against  the 
performance  metric.  Chapter  6  concludes  the  thesis  and 
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presents  reconmendiations  for  future  study. 


This  thesis  contains  five  appendices.  Appendix  A 
surveys  basic  e,JLie£  t  t  0£  a  and  is  recommended  to 
readers  unfamiliar  with  this  subject.  Appendix  B  is  a 
tutorial  on  Inf  oraa  t  jon  and  Cod_iny  Theory  and  is  likewise 
recommended  to  those  readers  unfamiliar  with  this  field. 
Appendix  C  contains  a  listing  of  the  EKG-EXEC  assembly 
language  software  as  well  as  one  BASIC  program  used  on  the 
Exorciser  for  data  analysis.  Appendix  D  contains  data 
printouts  of  the  data  taken  in  the  data  collection 
experiment.  Appendix  E  presents  photocopies  of  the 
specification  sheets  for  the  equipment  used  in  this  thesis. 

With  the  sequence  of  presention  outlined,  attention  now 
turns  to  the  theoretical  section  of  this  thesis.  The  first 
subject  is  data  compression  theory. 


I  I  .  Data  Compile  £  £_i  on  and  £  h£  EKG 

Data  compression  is  an  operation  in  which  data  from  ar. 
information  source  is  ' 'simplified* ’  or  ''filtered''  in  a 
manner  that  produces  an  approximation  of  the  original  with 
at  most  some  predefined  amount  of  distortion.  Some  form  of 
data  compression  is  usually  necessary  when  storage 
limitations,  bandwidth  requirements,  or  transmission  channel 
capacity  prohibit  operation  on  the  original  data. 

In  general,  data  compression  can  be  divided  into  two 
types  of  operations  (Ref  10:4)  .  The  first  operation,  called 

(ER),  is  an  irreversible  transformation 
which  reduces  or  compresses  the  data  by  mapping  a  source 
into  an  a  S.S.L  ox_im  ®  JLA  on  °f  itself  with  a  lower  entropy  rate. 
Sampling  is  an  example  of  such  a  transformation.  The  second 
operation,  known  as  redundancy  r e d U£_t _io n  (RR)  compresses  the 
sampled  data  train  by  reducing,  or  eliminating,  the 
£,®.<lunda.n£y  existing  in  digital  sequence.  Since  the 
redundant  components  of  the  data  train  contain  no 
information  about  the  source,  RR  is  an  ''exact''  data 
compression  operation. 

This  chapter  discusses  data  compression  as  it  has  been 
applied  to  the  electrocardiogram  (EKG).  Two  types  of  data 
compression  strategies  prevail.  The  first  strategy  involves 
two  (or  more)  ER  operations  on  the  EKG  data  and  attempts  to 
compress  the  data  by  .f  i.  i.  I  .£  .£  J.  n  K  selected  components  of 
discrete  transforms.  Because  ER  operations  are 

irreversible,  this  type  of  data  compression  is  sometimes 
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referred  to  as  ''inexact''  compression.  The  second  stategy 
p •.  i  rr:s  data  compression  by  reducing  the  redundancy  present 
in  the  sampled  EKG  data  train.  This  redundancy  arises  from 
two  causes  :  1)  neighboring  signal  samples  are  not 
statistically  independent  and  ;  2)  the  quantized  signals 
amplitudes  do  not  occur  with  equal  probability. 

Because  of  the  speed  limitations  of  the  Motorola 
Exorciser  microcomputer  used  in  this  thesis,  only  redundancy 
reduction  algorithms  were  tested.  This  chapter,  therefore, 
is  intended  as  a  review  of  the  work  that  has  been  done  in 
EKG  data  compression  to  allow  comparison  with  the  results 
obtained  by  this  author. 

En.tro££  Reduction 

As  is  known  from  information  theory  (Ref  19),  entropy 
{ H ( X ) }  is  defined  as  a  measure  of  the  ''randomness''  or 
''uncertainty''  of  an  information  source.  If  the  symbols 
emitted  by  the  source  are  statistically  independent,  then 
the  source  is  said  to  be  '' memory  1 e s s  '  '  and  entropy  is  given 
by  the  equa  tion : 

N 

H(X)=  -  5  P.log  P  (bits)  (D 
L  i  2  i 

i  =  l 

where  p.  represents  the  probability  of  occurrence  of  the  ith 
symbol  and  N  is  the  number  of  distinct  symbols  output  by  the 
source.  For  those  ''symbols''  in  a  data  set  which  occur 
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with  zero  probability,  the  term  p  log  P  is  defined  equal  to 

i  2  i 

z  f  r 

Immediately  obvious  from  Eq.(l)  is  the  observation  that 
H(X)  is  defined  on  a  d_i_s£.r.e _t£  probability  distribution.  In 
fact.  Shannon  (Ref  30)  defined  the  entropy  of  a  con^injous 
source  as  equal  to  positive  infinity.  Thus  an  ER 
transformation  must,  in  some  manner,  1 1  discretize''  a 
continuous  waveform  into  a  countable  set  of  components  and 
attach  some  probability  to  the  elements  of  the  set. 

S^m£Xi.Si  ■  The  clearest  example  of  this  ’’discretization'' 
is  sampling,  obviously  the  most  important  operation 
necessary  for  digital  signal  processing.  In  sampling,  an 
electrical  circuit  (such  as  an  A n a  1 o g - t o -D i g  i  t a  1  (A/D) 
converter)  periodically  measures  the  value  of  a  signal  x(t) 
and  records  the  data  as  a  num£r_ic  (usually  binary)  number. 
If  the  signal  is  sampled  at  least  twice  the  highest 
frequency  component  of  x(t),  and  the  duration  of  the 
sampling  operation  is  long  enough  that  ''aliasing''  effects 
(Ref  36:68-72)  of  ''windowing*'  are  negligible,  then  all  of 
the  ’’ frequency  domain’’  components  of  interest  in  x(t)  will 
be  preserved.  Physical  constraints,  however,  limit  the 
accuracy  of  the  amplitude  measurement  to  some  finite 
precision.  Amplitude  information  residing  below  the 
sensitivity  of  the  A/D  converter  is  irretrievably  lost. 

As  an  example,  let  the  A/D  converter  digitize  to  8 
bits.  With  8  levels  there  are  256  possible  outputs,  each 
with  a  certain  probability  of  occurrence.  If  the  continuous 
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waveform  fed  to  the  A  /  R  is  the  output  of  a  stationary 
stochastic  process  with  uniform  statistics,  then  each 
numeric  value  will  occur  with  probability  of  1/256  (assuming 
the  source  max/min  deviation  >_  the  A/D  dynamic  range). 
Assuming  s a  m  p  1  e  -  t o- s a m p 1 e  independence,  the  source  entropy 
is  then  calculated  as 

H  ( X ) =  ^  (  1/  256  )  log2256  =  8  .  (2) 

256 

Entropy  has  been  '  1  reduced  ’  1  from  +  <*>  t  o  8  .  If  the 

stochastic  source  has  ''less  random'*  statistics  (like 
gaussian),  entropy  would  be  reduced  even  futher. 

All  of  the  EKG  compression  routines  discussed  in  this 
thesis  are  implemented  on  digital  computers,  hence  the  ER 
operation  of  sampling  is  always  performed.  In  ''inexact'' 
EKG  data  compression,  the  next  operation  is  another  ER 
mapping  in  which  the  sample  sequence  is  transformed  into  an 
alternate  domain  and  filtered. 

Sl£jtlloj5.on^  1.  Exj)  a.nj.jjo.rys  and  F  _i_l  t.  e^_i  n.2.  •  A  bandlimited  waveform 

x(t)  can  be  expanded  (over  a  given  interval  T)  as  a  linear 

combination  of  orthonormal  basis  functions  0  (  t )  (Ref 

n 

36 : 20-21 )  .  Tha  t  is 
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X  (  t  )  = 


(?) 


^  a  0 
4  n  n 

n  =  0 


The  functions  0  ( t ) ,  as  n-0,1 

n 

or  thonor ma 1  if 


,  are  defined  as 


/ 


0.  (  t  )0  (t)  dt  =  1 

i  k 


i  =  k 


(4) 


=0  otherwise 


ibe  orthonormal  set  (0  (t))  is  called  cj>mj>lete  (C.O.N.) 

n 

if,  for  any  given  e>  0,  there  exists  an  N  and  a  _f.in_i_te 
expansion 


N-l 

x(t)  =  \  a  0  (t)  (5) 

L  n  n 

n  =  0 


such  that 


J  lx(t)-x(t)  I  2  dt  <  e  (6) 

T 

Given  a  complete,  orthonormal  set  {0  ( t ) } ,  then 

n 

representation  of  any  physical,  no i s e -  1 i m  i  t e d  signal  (over  a 

prescribed  interval  T)  is  possible  with  a  £i.nj.i£  set  of 

weighting  coefficients  { a  a  ). 

"  1  N—  1 


L 


1  2 


If  k  (  k  <  N  )  terms  in  E  q  .  (  5  )  are  selectively  suppressed 


(  i  .  e  .  ,  a  «  a  =  0  )  ,  then  the  signal  x  (  t  )  is  said  to  he 

0  1k 

filtered  of  those  components  and  a  conjressed  representation 
of  x(t)  is  produced. 

EKG  F  .i  _i  jt  .e  £  _i  n  Corner  ess  ion  .  A  great  deal  of  work 
(  1 )  ,  (  2), (26), (33), (35), (21)  has  been  done  in  attempting  to 

''compress''  EKG  data  by  storing,  or  transmitting,  selective 
components  of  an  orthonormal  expansion.  This  type  of 
compression  strategy  is  complicated  by  the  complex 
characteristics  of  the  EKG  waveform.  Foremost  are  the 
limitations  imposed  due  to  the  ''nonstationarity1'  or 
variability  of  the  EKG  source,  both  within  any  given 
waveform  and  the  general  population  as  a  whole. 


Fig  1.  Typical  EKG  waveform  with  arrythmia. 


During  an  EKG  collection,  the  heart  rate  of  the  person 
undergoing  testing  can  vary.  This  variation,  or  arrythmia, 
requires  that  a  suitable  reference  point  be  established  on 


the  P  -  Q  R  S  -  T  complex  (Fig  1)  around  which  the  orthogonal 
e  x ;  .  •  s i o  n  can  be  performed.  Without  this  reference,  the 
data  falling  within  an  expansion  interval  T  (based  purely  on 
a  constant  At  )  will  appear  to  be  ''almost’’  random.  If  the 
’’filtering’’  used  to  effect  compression  is  based  on  an 
expected  waveform  within  the  transform  window,  improper 
registration  will  cause  severe  degradation  in  compression 
efficiency.  The  above  situation  is  known  as  the  ’  ’epoch’  ’ 
problem  and  is  discussed  by  Womble  (Ref  3  5:703  )  , 

Assuming  that  the  expansion  interval  is  aligned 
properly  on  some  feature  of  the  EKG  (e.g.  R  wave),  then  the 
problem  of  variable  P ,  QR  S  ,  and  T  complexes  must  be 
considered  . 

If  the  individual  under  test  has  a  heart  disease,  then 
in  many  cases  the  P.QRS.and  T  segments  of  that  person's  EKG 
may  vary  significantly  from  the  population  "norm’’.  Again, 
if  the  compression  filtering  is  based  on  an  assumed,  or 
'  'normal''  waveform,  then  significant  reduction  in 
compression  efficiency  can  be  expected. 

These  problems,  among  others,  require  that  the  EKG 
’  '  f  i 1 tering  ’  '  compressor  be  robust  enough  to  handle  the 
variations  possible  within  the  waveform.  With  these 
limitations  in  mind,  discussion  will  now  proceed  to 
compression  transforms. 

IliSlI ®I5A  •  Two  major  types  of  discrete  filtering 
compression  strategies,  as  applied  to  EKGs,  will  now  be 
discussed.  These  are  the  Fast  Fourier  Transform  (FFT)  and 
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t  li  0 


discrete  Karhunen-Loevc  Transform  (DKLT). 


These  two 


t>.  '  :  :  q  u  e  s  are  representative  of  current  research  into  KIT-' 

filtering  compression  and  will  serve  as  good  basepoints 
against  which  to  compare  the  redundancy  reduction 
compression  techniques  outlined  in  chapter  3. 

Fast  Fourier  T_r  a.  n_sX£  r.m  •  The  fast  Fourier  transform  is 
a  computationally  efficient  algorithm  for  calculating  the 
discrete  Fourier  transform  (DFT).  The  following  discussion 
involves  the  DFT,  but  calculation  by  the  FFT  is  implied. 

Data  compression  using  the  DFT  is  achieved  by  zonaj^ 

X  i  l..t.er.i  n £  in  which  '’zones*'  of  the  transform  sequence  are 

selectively  discarded.  Usually  these  zones  are  defined  by  a 

''cutoff  frequency''  f  and  only  those  components  less  than 

c 

or  equal  to  f^are  saved.  Data  reconstruction  is  performed 
by  computing  the  inverse  DFT  (FFT)  on  the  filtered  sequence 
and  replacing  the  filtered  components  with  zeroes.  Using 
the  symmetry  relationships  described  in  Oppenheim  and 
Shaffer  (Ref  24:103-105),  then  the  transform  sequence  for 
N=  8  is: 


1(0) 

R  ( 0 ) 

+ 

j lm(0) 

X(l) 

R  ( 1 ) 

+ 

jlm(l) 

X  ( 2 ) 

R(  2) 

+ 

j Im ( 2 ) 

X  ( 3  ) 

= 

R  ( 3 ) 

+ 

j Im ( 3  ) 

X  ( 4 ) 

R  <  4 ) 

+ 

j Im ( 4 ) 

X  ( 5 ) 

R  ( 3 ) 

- 

j Im ( 3 ) 

X  (6) 

R(  2) 

- 

j Im ( 2 ) 

X  (7) 

m 

R(  1) 

- 

j  I  m  (  1  ) 

where  R  is  the 
complex  number  X, 


real 

and 


part, 

j=VTT 


I  m 


the  imaginary  part  of  the 


Zonal  filtering  takes  advantage  of  the  symmetry  in  F.  q. 


(7)  by  saving  those  positive  frequency  components  less  than 


or  equal  to  a  certain  cutoff  frequency  f  ^  •  If  f  were 
chosen  as  equal  to  X  (  2  )  ,  then  only  X(0),X(1),  and  X(2)  would 
be  saved.  On  reconstruction,  X(3),X(4),and  X ( 5 )  would  be 
set  equal  to  zero  (i.e.  they  have  been  filtered  out)  while 
X(6)  and  X ( 7 )  would  be  recreated  from  X(l)  and  X(2)  using 
symmetry.  The  inverse  DFT  (FFT)  now  produces  a  ''filtered1' 
approximation  of  x(n). 

F.KG  data  compression  via  filtered  FFT  spectra  has  been 

studied  by  Womble  (Ref  35)  and  the  TRW  corporation  (Ref 

33).  In  both  studies  the  distortion  criterion  used  in 

establishing  f  was  visible  reproducibility  with  no 

c 

detectable  distortion. 

In  the  TRW  study,  compression  ratios  (defined  as  bits 
in  :  bits  out)  from  2:1  to  as  high  as  17:1  were  obtained 
using  zonal  filtering.  The  high  compression  ratios  were 
measured  using  highly  rhythmic  FKGs  taken  from  an  individual 
(an  astronaut)  in  a  low  noise  environment.  This 
extraordinary  compression  ratio  is  far  from  ''normal'1, 
however.  Womble  (Ref  35)  has  shown  that,  on  the  average, 
40-80  terms  of  a  512  sample  FFT  (sampled  at  500  Hz)  are 
necessary  to  reproduce  the  EKG  with  acceptable  visual 
distortion.  Since  the  FFT  requires  storage  of  2  numbers  per 
term  (real  and  imaginary  components)  then,  in  general,  TFT 
zonal  filtering  compression  ratios  of  5:1  to  3:1  are  more 
common. 

The  FFT  is  often  used  in  digital  signal  processing 


because  of  its  speed  and  representation  in  the  frequency 


d  ;  :•  .  As  will  be  seen  f  roc  the  data  in  chapter  5  , 

compression  ratios  of  5  :  1  are  usually  higher  than  those 

obtainable  by  redundancy  reduction  techniques.  Even  so,  the 
FFT  is  not  the  ''optimal'*  transform  for  representing  a 
samp  1 e  sequence. 

I!-i-J>c.  larhunen^oeve  J.IJ1.S.SX  •  Because  all  of  the 

filtering  compression  techniques  are  ER  transformations, 
distortion  upon  reconstruction  is  inevitable.  One  would 
like  a  performance  measure  against  which  this  distortion 
could  be  evaluated. 

One  common  measure  of  performance  is  the  n£jin  ltjUEi£_e 
error  defined  by  the  equation: 

e ( M ) =  E { (  X  -  X )  2 }  (8) 


where  E  is  the  statistical  expectation  operator,  X  is  a 
discrete  signal  composed  of  N  sample  values,  and  X  is  the 
estimate  of  X  via  some  orthogonal  coordinate  system.  Given 
that  a  representation  of  X  is  desired  with  less  than  N 
components,  Ahmed  and  Rao  (Ref  2:200-203)  have  shown  that 
the  DKLT  is  the  oj3_t_imum  transform  to  minimize  mean  square 
error . 

The  DKLT  can  be  described  as  follows:  Let  the 
orthonormal  transform  matrix  [T]  be  defined  as 


IT]'  =  (  0  ,  0  ....  0  1  {  [ T ]  ' = [ T ]  transpose)  (9) 

12  N 
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Now  the  mean  square  error  defined  in  Eq.(8)  can  be  redefined 


e  CO=E  MAX  )  '  (AX  )  } 


a  s 


:  E  { 


5  ^  (y  .~b . >  * y .-b . 

L  L  i  i  J  J 


)  (0'  0  )  } 
i  j 


i  =  M+l  j  =M+1 


N 

y  2 

=  )  E { ( y  .  -b  .  )  } 

4  11 

i  =  M+1 


Ahmed  and  Rao  (Ref  2:202)  show  that  by  minimizing 

N 

e ( M )  =  )  (  0;E{<  X  -  X  ) (  X  -  X  ) } '0  ) 

t-  x  ^ 

i  =  M+l 


where  X  is  the  mean  of  X. 

The  expectation  in  Eq.  (15)  is  recogniz 
S.  0  f  X  ,  hence  Eq.  (15)  becomes 

N 

e (M)  =  \  (  0' . [K  10  ) 

L  l  x  i 

i  =  M+l 


where  [K  ]  is  the  covariance  matrix  of  X. 

x  ~ 

By  minimizing  Eq.(16)  ,  Ahmed  and  Rao  (Ref 


(14) 


Eq . (14) 


(15) 


e  d  as  the 


(16) 


:  200-205) 
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si',  i'  "  that  the  othomonc  al  functions  0  .  become  the 

1 

of  the  cc  variance  matrix  [  K  x  1  ant'  *  ^  e  ncrn 
square  error  becomes 

N 

e  ( M )  =  ^  X  (17) 

i  =  H  + 1 

where  the  X  are  the  eiiinvilMl  of  [K  ].  By  expanding  X 
l  x 

with  the  eigenfunctions  corresponding  to  the  M  largest 
eigenvalues,  then  X  is  filtered  of  N-M  components  with 
minimum  mean  square  error.  This  is  the  discrete 
Karhunen-Loeve  transform. 

The  DKLT  has  been  studied  by  Ahmed  (Ref  1)  and  Womble 
(Ref  35).  Both  studies  compared  the  performance  of  EKG  data 
compression  using  the  DKLT  against  other  orthogonal 
transforms  . 

Ahmed's  tests  utilized  canine  EKGs  and  clearly  showed 
the  optimality  (in  the  11  mean  square  sense'')  of  the  DKLT. 
Ahmed,  however,  deemed  the  DKLT  to  be  too  complex  for 
practical  implementation,  and  proceeded  with  the  development 
of  EKG  compression  strategies  using  suboptima]  transforms. 
The  details  of  these  suboptimal  expansions  will  not  be  given 
here,  but  the  reader  is  referrenced  to  Ahmed's  paper  (Ref 
1)  . 

Womble,  on  the  otherhand,  demonstrated  that  the  DKLT  is 
not  to  difficult  to  implement.  In  his  experiments,  Womble 
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took  3  lead  vectorcardiogram  ( V  C  G )  data  (see  appendix  A), 
hor-if  ter  referred  to  as  X  ,  Y ,  Z  ,  and  first  transformed  the 


data  into  a  different,  orthogonal  coordinate  system 
(U.V.W)  .  The  transformation  was  determined  by  solving  for 
the  eigenvalues  of  the  3X3  matrix: 


N 


=  i/N  y 


i  =  l 


X  (  i  3( 

Y  (  i 
Z(  i 


X(i),Y(i),Z(i) 


(18) 


where  N  was  chosen  equal  to  200  and  X  (  i  )  ,  Y ( i )  ,  Z  (  i  )  are  the 
X,Y,Z  components  of  the  VCG  in  the  Frank  (Ref  14)  coordinate 
sy  s  t  em . 

Next  an  ''average'',  or  mean,  heartbeat  was  calculated 
using  900  patients  and  the  data  (in  the  eigenvector 
coordinate  system)  was  subtracted  from  the  mean  forming  a 
''patient'*  vector  p.  The  vector  p  is  defined  as 


u ( 1 ) -u  ( 1 ) 

u(2)-um(2) 


u ( N) -u  ( N) 
v(l)-vm(D 

v(2)-vra<2) 

m 


v  (  N)  -  v  (  N) 

z(l)-zra(l 

z(2)-zm(2) 

m 


z  (  N)  -  z  (N) 
m 


(19) 


This  patient  vector 


is  expanded  using  the  eigenfunctions 


2 


of  the  matrix 


N 

L  =  1/ N  \  ( p  ) ( p  )  '  (20) 

L  i  i 

i  =  l 

where  N  is  now  a  large  number  of  patients  being  ''averaged'' 
(up  to  300  reported  in  Ref  33) .  The  eigenvectors  of  this 
tremendous  matrix  are  calculated  (once  for  all  time),  and 
then  M  ( M  <<  200)  are  used  to  expand  the  data  vector  p. 

The  above  approach  has  allowed  accurate  representation 
of  EKG  sample  sequences,  properly  aligned  on  the  heartbeat, 
with  an  M=20  DKLT  coefficients  per  lead  per  second  (Ref 
35),  At  Womble's  sample  rate  of  250  Hz,  this  represents  a 
compression  ratio  of  over  12  :  1  .  With  the  most  significant 

eigenfunctions  stored  from  the  solution  of  Eq .  (20),  then 

the  compression  of  digitized  EKG  data  by  filtering  the  DKLT 
expansion  on  p  is  approaching  feasibility  on  a 
m  icrocomput  e  r , 

The  preceeding  discussion  was  intended  as  a  basic 
tutorial  on  some  of  the  entropy  reducing  (ER) 
transformations  currently  under  test  for  EKG  data 
compression.  As  stated  earlier,  ER  operations  are 
''inexact'*  because  some  ''information''  is  always 
discardt  ’  .  By  discarding  data  efficiently,  zonal  filtering 
can  achieve  compression  ratios  larger  than  those  obtained 
using  the  redundancy  reduction  techniques  implemented  in 
this  thesis. 
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E£.du  n  d  ji  nqy  Reduction 


Redundancy  reduction  is  an  operation  which  performs 
data  compression  by  indentifying  and  removing  the  redundant 
components  of  a  digital  sequence.  This  redundancy  exists 
for  two  reasons  :  1)  the  sample  points  are  not  statistically 
independent  and  ;  2)  the  quantized  amplitude  values  of  the 
sample  train  do  not  occur  with  equal  probability.  The 
redundant  components  of  the  data  sequence  carry  no 
''information''  (see  appendix  B),  hence  their  removal  does 
not  affect  the  ''message''  content  of  the  data. 

This  section  of  chapter  two  discusses  redundancy 
reduction  (RR)  operations  which  have  been  applied  to  the 
EKG.  This  is  done  because  the  compression  algorithms 
examined  in  this  thesis  are  of  the  RR  type,  and  the 
background  given  here  will  aid  in  the  descriptions  given  in 
chapter  three. 


Data 

3 

- 3 

En t  ropy 

De correlator 

Encoder 

Fig  2.  Typical  EKG  Redundancy  Reduction  Data  Compressor. 


The  sampled  EKG  contains  redundancy  resulting  from  both 
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sample-to-sample  correlation  and  unequal  amplitude 
probability.  As  is  illustrated  by  Figure  2 ,  each  of  these 
redundancy  components  can  be  reduced  by  a  different 
ope  r  a  t  or . 


Th  e 

decorrelator 

,  as  inferred  by  its 

title,  transforms 

the 

data 

in  a  manner 

which 

decorrelates 

the  data  stream. 

The 

deco 

rrelated  re 

s  i  d  u  a  1 

sequence  is 

then  efficiently 

compressed  by  means  of  the  entropy  encoder. 

To  reduce  the  rendundancy  arising  from  intersample 
correlation,  two  basic  approaches  are  used.  Th  e  first 
approach  utilizes  linear  predictor/interpolators  (Ref  28,33) 
to  produce  an  information  bearing  ''residual  ''  sequence. 
The  second  method  generates  the  residual  sequence  by  taking 
successive  differences  on  the  data  stream.  As  will  be 
shown,  these  residual  sequences  carry  a.i.1  of  the  soarce 
i.“X  °  rmji  t..ion  with  minimum  intersample  redundancy.  The 
predictor/interpolator  method  is  discussed  first. 

E££di_c_tO£S^  and  I.njt^jrjg  o  l..a_t  ors  .  A  predictor  estimates  the 
next  sample  value  of  a  sequence  (i.e.  based  on  a  linear 
combination  of  k  past  samples.  That  is 


k 


x 

n 


a  x 

i  n-  i 


i  =  l 


(21) 


where  a.  are  coefficients  chosen  to  minimize  the  mean  sgBare 
2  ~  2 

error  ae=E{(X-X)  )  between  the  sample  sequence  and  the 
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predicted  sequence  Xn  .  An  error  ,  or  residual,  sequence  e  n 
can  then  be  formed  where 


thus 


(22) 


X  =  X  +  e  (23) 

n  n  n 

Conceptually,  this  technique  decomposes  a  sample  value 

into  a  part  which  is  correlated  with  k  past  sample  values 

(i.e.  the  redundant  component)  and  a  part  which  is 

uncorrelated  with  them.  Linear  mean  square  estimation 

theory  (Ref  24:385-430)  shows  that  the  uncorrelated  part  (  e  ^ 

)  may  be  retained  alone  with  n  <>  loss  of  information. 

In  their  research  in  EKG  data  compression,  Ruttimann 

and  Pipberger  (Ref  28:616)  prove  that  since  E(c  )  =0 ,  then 

n 

the  mean  square  error  a*  is  equal  to  the  variance  of  en  • 
With  a  second  order  predictor  (k=2),  Ruttimann  and  Pipberger 

i  1 

have  demonstrated  a  variance  reduction  (crx/oe)  of  over  25  : 

1.  This  reduction  in  variance  implies  that  the  EKG  residual 

sequence  e  is  much  more  tightly  clustered  around  a  given 
n 

mean  than  is  the  original  sequence  X  .  This  clustering,  as 

n 

will  be  discussed  later,  enhances  data  compression  by  means 

of  ejijt _r 0|>y  ,  or  s^£U££.e  encoding , 

In  an  analogous  way,  interpolators  estimate  a  value  of 

x  .  In  the  case  ot  the  interpolator,  however,  the  estimate 
n 
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of  x  consists  of  a  linear  combination  of  past  and  future 
n  - 

samples.  Th  at  is 

k  m 

x  =  \  a  x  +^bx  (24) 

n  L  i  n- i  Zin+i 

i=l  i = 1 

where  k  past  and  m  future  values  are  used.  As  with  the 

predictor,  the  coefficients  a.  and  b  are  again  chosen  to 

i  i 

minimize  the  mean  square  error.  As  was  the  case  with  the 
second  order  predictor,  Ruttiman  and  Pipberger  (Ref  28:617) 
have  found  that  a  second  order  interpolator  (k=l,m=l)  yields 
EKG  residual  sequences  e  n  with  the  most  significant  variance 
reductions  (greater  than  31  :  1). 

EKG  data  compression  utilizing  predictors  /  interpolators 
have  been  studied  by  the  TRW  Corporation  (Ref  33),  as  well 
as  Ruttimann  and  Pipberger  (Ref  28).  In  both  cases, 
predictors  /  interpolators  of  order  2  seem  to  prevail.  As  is 
shown  by  the  two  groups  above,  second  order  systems  have  the 
smallest  residual  sequence  variance  hence  are  most  ameanablc 
to  entropy  encoding.  An  alternate  approach  used  to  reduce 
intersample  redundancy  is  by  means  of  difference 
operations. 

D_i_fj>rence  Re  d  u££_i  on  .  In  difference  reduction,  the  residual 
sequence  is  formed  by  taking  successive  differences  of  the 
sample  data  train.  Because  there  is  no  multiplication  (as 
i  Eq.(24)),  the  difference  operation  is  inherently  a 
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simpler  procedure  than  is  prediction  or  interpolation. 
Rif.  rente  sequences,  ho  w  ever,  are  not  optimized  v  i  t  !. 
respect  to  mean  square  error  and  less  ''efficient*' 
redundancy  reduction  (decorrelation)  occurs. 

An  example  of  an  EKG  difference  reduction  compressor  is 
illustrated  in  Figure  3.  This  technique  was  implemented  by 
Cox  and  Ripley  (Ref  7)  and  tested  against  a  data  base  of  45 
patients.  Figure  4  shows  that  Cox  and  Ripley’s  second 
difference  decorrelator  produced  a  sharply  peaked  relative 
frequency  distribution.  This  '’peakedness''  or  clustering 
of  the  residual  sequence  permits  efficeicnt  entropy 
encoding.  A  variant  of  the  difference  reduction  above  is 
time  compression. 

£oS>B£  essU  n  .  EKG  time  compression,  as  implemented 
by  Dow e r , R e r g h o f e r  ,  and  Stewart  (Ref  12,29),  uses  a  second 
order  difference  reduction  but  instead  of  keeping  the  value 
of  zero  (the  most  common),  a  run  1  £  n  1  _t  h  counter  (At)  is 
kept.  This  run  length  counter  measures  the  number  of 
repetitive  A  *  X  sequence  terms  equal  to  zero.  By  saving 
(then  encoding)  only  those  A*X^O,and  the  At  between  the 
nonzero  second  differences,  data  compression  can  be 
realized. 

Time  compression  is  the  method  that  has  been 
implemented  and  studied  extensively  by  this  author.  Chapter 
3  discusses  two  different  RR  compression  algorithms  which 
both  use  second  order  time  compression  for  the 
d  e  c  o r r e 1  a t o r  .  For  now,  dicussion  is  focused  on  the  second 
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P  n  t  r  o  p  y 
P  n  c  o  d  e  r 


£ll£2liil£-  Entropy,  or  source,  encoding  operates  on 
t  '  e  re raining  redundancy  in  the  residual  sequence  e 

resulting  fron  unequal  source  symbol  probability.  How  well  e 

can  be  compressed  is  given  by  Shannon's  r^o_ij>_l-£  s  -S  ££££££ 
n  '  ' .  ' . 

£ll££££!9  (Ref  30)  which  states  that  the  average  number 

of  binary  symbols  per  source  output  can  be  made  to  approach 

the  entropy  of  the  source  and  no  less.  Unfortunately,  the 

EKG  1  1  source  1  1  has  memory,  hence  the  entropy  of  this  source 

will  be  less  than  that  which  would  be  calculated  from 

Eq.(l).  In  general,  the  true  value  of  a  nonstation  a.  ry, 

memory  source  is  difficult  (or  impossible)  to  calculate. 

To  circumvent  this  ''memory''  problem,  the  assumption 

is  made  in  the  literature  (Ref  29,12,  7,35)  that  the 

'  ' un c o r r e 1  a t e d '  '  nature  of  the  residual  sequence 

e  approaches  independence,  hence  the  entropy  of  e  as 
n  n 

calculated  by  Eq.(l)  is  a  good  bound  on  the  possible 
compression.  Since  the  variance  of  e  ^  is  sharply  peaked 
around  zero,  entropy  encoding  via  variable  length  coding 
(VLC)  appears  attractive. 

In  variable  length  coding,  those  values  of  e  ^  which 
occur  most  often  are  assigned  the  shortest  £od£  words  (i.e. 
fewest  code  symbols  per  source  symbol).  As  example,  assume 
that  both  the  source  symbol  alphabet  and  the  code  alphabet 
are  binary.  The  values  in  the  sequence  are  the  result  of 

algebraic  operations  on  £i.*.ed  J_.en,g_th  numeric  sample  values 

and  are  hence  fixed  length  binary  numbers  (c.g.  I.=  f. )  .  The 

variable  length  coder  maps  these  fixed  length  numeric  values 


29 


words 


(binary)  into  unj^ue  ly  decodab_le  (  T  D  )  binary  code 
whose  bit  length  is  a  function  of  the  frequency  of 

occurrence  of  the  values  in  e 

n 

Coding  theory  (Ref  19:237-248)  shows  that,  in 
principle,  it  is  possible  to  have  variable  length  codes  with 
an  S.v^raj’^  bj_t^  i£U£t.h  (  1  )  equal  to  the  entropy  of  source. 
Hence  with  the  right  VLC,  a  compression  ratio  of  L  /  is 
achievable  . 

A  common  VLC  used  in  EKG  data  compression  research  (Ref 
7,28)  is  the  Huffman  code.  Huffman,  in  1952,  developed  ?r. 
algorithm  (Ref  16)  for  generating  the  optimal  lTD  code 
(assuming  stationary,  memory  less  source).  This  code  is  in  a 
class  of  CD  codes  called  piyeXJ..*  f-odej;  in  which  no  code  word 
is  the  prefix  of  any  other.  Unfortunately,  a  codeword  must 
be  assigned  to  every  possible  symbol  which  occurs, 
regardless  of  how  infrequently.  This  means  that  although 
the  average  code  word  bit  length  approaches  the  entropy  of 
the  source,  the  longest  code  word  can  be  substantially 
larger.  In  a  straight  Huffman  code,  these  ''long''  code 
words  can  induce  severe  problems  due  to  ’'buffer  overflow'’ 
(Ref  17 ) . 

For  practical  implementation  in  EKG  data  compression, 
Ruttimann  and  Pipberger  (Ref  28)  and  Cox  and  Ripley  (Ref  7) 
constructed  a  modified  Huffman  code.  In  this  modified  code, 
the  residual  sequence  source  words  are  partitioned  into  a 
frequent  set  and  an  infrequent  set  (known  as  ''else'’).  A 
Huffman  code  was  then  formed  with  all  of  the  residual  words 


in  the  first  set  plus  a  special  code  word  used  as  a  prefix 
for  anj'  source  word  from  the  infrequent  set.  The  prefix, 
when  it  occurs,  is  followed  by  a  fixed  length  suffix  which 
contains  the  value  of  the  infrequent  source  word.  The 
probability  that  ''else'*  will  occur  must  be  kept  small 
enough  to  manta  in  the  efficiency  of  the  truncated  Huffman 
code. 

Using  the  modified  Huffman  code  in  conjunction  with  a 
second  order  interpolator,  Ruttimann  and  P  ipberger  (Ref  2  8) 
have  attained  compression  ratios  as  high  as  9  :  1.  To  get 
this  ratio,  however,  significant  digital  signal  processing 
was  performed  on  the  ''raw''  8  bit  data.  This  preprocessing 
involved  digital  filtering  for  noise  reduction  and  Lagrange 
interpolation/decimation  to  produce  an  effective  200  Hz 
sample  rate.  Nonetheless,  this  represents  a  significant 
approach  to  the  compression  ratios  attainable  by  the 
discrete  Karhunen-Loeve  transform  mentioned  previously. 

Although  optimal,  Huffman  codes  are  not  the  only  VI.C 
used  in  EKG  data  compression.  Two  different  codes  will  be 
described  in  chapter  three,  one  of  which  (Dower  code'  may 
possibly  be  ''more  optimal''  than  Huffman  in  .the  compression 
pi  quantized  FK  Gp . 

Summja  rp 

This  chapter  has  reviewed  the  theory  of  data 
compression  and  how  this  theory  has  been  applied  to  the 
electrocardiogram.  It  was  shown  that  data  compression  could 
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be  partitioned  into  two  types  of  operations:  1)  entropy 
re.'-  v  i  r.  £  transformations  which  map  a  data  source  i  r.  t  o  an 
approximation  of  itself  with  a  lower  entropy  rate  and  ;  2) 

redundancy  reduction  operations  which  compress  by  removing 
redundancy  resulting  from  sample-to-sample  dependence  and 
unequal  source  symbol  probabilities. 

The  first  operation  was  applied  to  the  FKG  via 
''filtering'1  of  orthogonal  expansions  of  the  digitized 
EKG.  Filtering  transforms,  especially  the  discrete 
Karhunen-Loeve  transform,  were  shown  to  be  very  efficient 
''compressors''  if  the  loss  of  the  filtered  components  were 
tolerable.  If  this  loss  was  not  acceptable,  then  redundancy 
reduction  operations  are  used. 

In  redundancy  reduction  techniques,  the  EKG  is  first 
processed  by  passing  the  digitized  uta  through  a 
decorrelator  which  reduced  the  redundant  component  caused  by 
source  symbol  dependence.  This  decorrelator  could  be 
implemented  with  predictor  /  interpolators  or  difference 
operations.  Next  the  data  is  encoded  via  entropy  encoding 
operations,  usually  utilizing  variable  length  codes.  It  was 
finally  shown  that  a  second  order  interpolator,  followed  by 
an  ''optimal''  Huffman  encoder  could  achieve  compression 
ratios  which  approach  those  obtained  by  the  discret 
Karhunen-Loeve  transform.  Both  of  these  last  two 
techniques,  however,  require  substantial  computational 


overhead  . 


III. 


JLIlX  EKG  Coiner  s^_i  o  n  Je.c  h  n_i  £}  u  e.s 


Two  EKG  data  conpression  algorithms  are  studied  in 
detail  in  this  chapter.  The  first  compression  technique, 
hereafter  referred  to  as  the  Tolan  method,  was  conceived  by 
Dr.  Gil  Tolan, MC  from  the  USAF  School  of  Aerospace  Medicine 
(USAFSAM),  Brooks  AFB,  Texas.  The  second  compression 
approach,  referred  to  as  the  Dower  method,  was  developed  by 
Mr.  Roger  Dower  and  Mr.  Pave  Berghofer  from  Shaugh  nessy 
Hospital,  Vancouver,  B.C.,  Canada.  Both  of  the  EKG 
compression  procedures  are  redundancy  reduction  operations 
using  time  compression  for  decorrelation  and  variable  length 
codes  for  entropy  encoding. 

This  author  had  originally  intended  to  implement  and 
test  both  the  Tolan  algorithm  and  the  Dower  algorithm  on  the 
Motorola  microcomputer  (See  Chapter  4).  Unfortunately, 
difficulties  with  hardware  failures  and  insufficient 
software  tools  (i.e.,  a  high  order  language)  prevented 
implementation  of  the  Dower  algorithm.  Nonetheless,  this 
chapter  compares  the  design  of  both  the  Tolan  and  the  Dower 
algorithms  and  illustrates  their  differences  as  well  as 
their  similarities.  Based  on  the  results  of  the  Tolan 
compression  approach  (chapter  5),  this  comparison  will 
illustrate  the  potential  performance  of  the  Dower 
compression  stategy  in  a  real  time  microcomputer 
enviroment.  Before  continuing  with  the  Dower  and  Tolan 
algorithm  descriptions,  a  short  digression  will  be  made. 

In  both  the  Tolan  and  The  Dower  compressors,  a  second 
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difference  operation  is  used  to  produce  an  information 
he  s  rii.j  sequence  with  reduced  conponenl-to-cor.  ponert 
dependence.  Why  the  second  difference  operation  results  in 
the  lowest  correlation  is  a  question  for  closer  scrunity. 


Fig  5.  Nonstationary  waveforms  with  random  level  and  slope. 
(From  ref  6:91) 
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A  process  (like  the  EKG)  exhibits  a  wide 

amplitude  distribution  due  to  the  random  ’’wander''  of  t  k e 
waveform  as  shown  in  Figure  6.  This  wander,  or  '  'moving 
average'',  can  be  induced  by  patient  variation,  EKG 
apparatus  drift,  or  both.  Time  series  analysis  (Ref  6) 
shows  that  a  nonstationary  process  which  has  sample 
functions  which  are  ''locally  stationary''  or  homogenous 
(Figure  5)  can  be  represented  by  a  process  model  which  calls 
for  the  ALlh  AA  A  A  S.L  ®  H£.  ®.  2.A  .the:  process  _t  be  j.  op^xy  . 

The  proof  of  this  assertion  is  given  by  Box  and  Jenkins  (Ref 
6 : 85-125)  . 

If  the  n o n s t a t i o n a r y  process  sample  sequence  (time 
series)  exhibits  a  random  level  as  illustrated  in  Figure  5a, 
then  a  first  difference  operation  will  remove  this  ''moving 
average''  and  force  the  resulting  difference  sequence  to  be 
centered  around  zero.  If  the  waveform  exhibits  a  random 
slope,  as  shown  in  Figure  5b,  then  a  second  difference 
operation  will  remove  this  quadratic  ''bias’’  with  a 
corresponding  reduction  in  amplitude  distribution  variance 
(Figure  7.)  Comparison  of  Figures  5  and  6  shows  that  an  EKG 
trace  can  ''look''  similar  to  the  example  in  Figure  5b. 

From  the  theory  of  stochastic  processes  (Ref 
9:330-331) ,  it  is  known  that  the  expected  value  of  a  sample 
mean  obtained  by  sampling  a  wide-sense  stationary  random 
process  along  a  sample  function  in  time  is  equal  to  the 
constant  mean  value  of  that  random  process. 


Fig  7.  Simulated  variance  reduction  via  second  differencing. 
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In  addition,  the  variance  of  the  sample  mean  is  inversely 


r :  '  rtinr.  1  to  the  number  of  samples  taken  when  the  samples 

are  pairwise  u n c o r r e 1  a t e d .  Another  fact  about  widesense 
stationary  processes  is  that  their  autocorrelation  functions 
are  dependent  only  on  the  time  difference  between 
observation  of  the  sample  sequence  and  that  R(t^  -t^)  <  R(0) 

f°r  * j - 1 2  £  0  •  Since  the  second  difference  is  the  first 
''difference'*  which  can  be  modelled  as  coming  from  a 
''stationary''  process,  and  the  maximimum  correlation  occurs 
for  zero  time  difference,  then  the  correlation  must  be 
reduced  for  adjacent  sequence  values  in  the  second 
difference  operation. 

This  hueristic  argument  is  far  from  complete  and  does 
not  explain  why  the  third  difference  exhibits  worse  behavior 
than  the  second  difference.  The  EKG  waveform  is  a  romplex 
function  from  a  complex  source  and  higher  order  effects 
could  begin  to  dominate  with  the  third  difference 
operation.  rather  analysis  of  this  anomaly  is  left  for 
future  study. 

The  remainder  of  this  chapter  is  organized  i  n  the 
following  manner.  First  the  Tolan  algorithm  is  described, 
followed  by  a  description  of  the  Dower  procedure.  Next  a 
short  synopsis  will  be  made  of  three  other  EKG  data 
compression  algorithms  uncovered  during  the  research  of  this 


thesis 


To  a  n  EKG  Data  CotnEressor 

The  Tolan  EKG  data  compression  algorithm  is  a 
redundancy  reduction  procedure  which  processes  a  three  lead 
EKG  (VCG)  and  produces  a  compressed,  digital  output.  This 
digital  output  sequence  could  subsequently  be  channel 
e n£ o d£ d  for  ''errorless'*  transmisson  (Ref  2  7  and  Appendix 
B)  or  stored  for  later  retrieval  and  reconstruction. 

As  was  the  case  for  the  RR  techniques  described  in 
chapter  2,  the  Tolan  compressor  is  subdivided  into  a  data 
decorrelator  and  an  entropy  encoder.  The  decorrelator  is 
discussed  first. 

To U n  De c or  re  1 a^or .  The  Tolan  decorrelator  is  a  second 
order  d_iXX^£  e.n.c  S.  r  £  d  u  j:  _t  i°I!  operation  which  utilizes  a  t__i  m  je 
approach  to  form  a  decorrelated  output 
sequence.  A  second  order  system  was  chosen  based  on  the 
experimental  results  of  Dower  and  Berghofer  (Ref  12)  and  Cox 
and  Ripley  (Ref  7)  which  showed  maximum  compression  gain 
with  a  second  order  difference  operation.  The  Tolan 
decorrelator  works  on  a  three  lead  EKG  (VCG)  signal  set, 
assumed  to  be  sampled  at  a  constant  rate.  The  data 
compression  is  achieved  in  real  time  between  successive 
samp  1 e  s . 

The  Tolan  decorrelator  algorithm  is  defined  in  figure 
8.  Close  examination  of  the  algorithm  in  Figure  8  reveals 
that  the  second  difference  data  is  stored  onJ_y  if  :  1)  any 

of  the  three  A*  values  are  nonzero  or  ;  2)  if  the  At  counter 
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records  more  than  127  repetitive  cases  where  A  2  x  -  A  2  y  -  A  1  t  <1  . 

V  v.  s  1  was  chosen  cl  u  e  to  the  high  decree  >  (  c  ••  r  r  e  1  .  t  i  • 

between  the  leads  of  an  F  K  G  (i.e.  when  one  lead  is 
changing,  so  are  the  others).  The  capacity  of  the  time 
counter  in  rule  2  was  arbitrarily  chosen  to  be  sufficient  to 
record  the  long  quiescent  periods  which  occur  in  the  F  K  G 
(see  Figure  1)  and  short  enough  to  be  efficiently  stored. 

Step  12  of  the  Tolan  algorithm  in  Figure  8  calls  the 
variable  length  encoding  subroutine  (Figure  10)  which 
encodes  the  A  2  terms  calculated  by  the  second  difference 
decorrelator.  This  encoding  procedure  is  the  next  subject 
to  be  discussed. 

Tolan  Entropy  Encoder  .  The  Tolan  code  is  an  uniquely 

decodable  variable  length  code  which  stores  the  A2  values  as 

a  contiguous  sequence  of  binary  1 ' s .  The  length  of  this 

''run'*  of  binary  l's  is  equal  to  the  magnitude  of  the  A2 

term.  To  delineate  between  the  ’’runs’’,  binary  0's  arc  used 

as  codeword  delimiters.  Since  the  second  difference  has 

both  negative  and  positive  values,  a  sign  bit  (0  for 

positive,  1  for  negative)  immediately  follows  the  0  bit 

2  2  2 

delimiter.  The  three  values  A  x,A  y,A  z  are  encoded  and 
stored  sequentially  followed  by  a  delimited,  7  bit,  Sjcoded 
At  value.  A  A  value  of  zero  is  indicated  by  3  successive  0 
bits. 
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A  x -  0 ,  A  v  =  0 ,  A  7  =  0,  A  t  =  1 


i  : 

2:  x(i)=(a/d  ch  0),y(i)=(a/d  ch  l),z(i)=(a/d  ch  2) 

3:  mem(0)=x(i)  ,mem(l)=y(i),mem(2)=7(i) 

4  :  i (  i  +  1 ) =x ( i) +Ax ,  y(i+l)=y(i)+Ay,  I( irl)*z( i)+Az 

5:  if  ready  for  next  sample  then  GOTO  6  else  GOTO  5 
6:  i=i+l,x(i)=(a/d  ch  0),y(i)=(a/d  ch  l),z(i)=(a/d  ch  2) 

7:  A1x  =  x(i)-?(i),  A2y=y(i)-$>(i),  Alz=7.  (i)-z(i) 

8:  if  A 1 x^O  or  AlyfO  or  A 1 z 1 0  then  GOTO  11  else  GOTO  9 
9 :  At  =A  t  +  1 

10:  if  At  <  127  then  GOTO  4  else  GOTO  12 

11:  Ax=Ax  +  A2x,  Ay=Ay  +  A2y,  Az=Az  +  A2z 

2  2  2 

12:  go  subroutine  coder  {  A  x,A  y,A  z  ,At) 

13:  if  memory  is  full  then  ST01*  else  GOTO  14 
14:  A  t  =  1 
15:  GOTO  4 
wh  ere 

x  (  i  )  , y  (  i )  ,  z (  i ) =  sampled,  8  bit  precision,  EKG  data 

Ax,Ay,Az  =  first  difference  ( A x ( n ) =x ( n ) - x ( n- 1 ) } 

A  x,A  y,A  z  =  second  difference  (A  z(n)-Ax(n)-Ax(n-l) ] 

At  =  time  difference  between  nonzero  A2  values 
x(i  +  l)»y(i  +  l),'z(i‘fl)~  next  predicted  data  points 

Fig  8.  Tolan  Collection  and  Decorrelation  Algorithm. 
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2  2  2 

As  an  example  of  Tolan  encoding,  let  A  x=3,  A  y  =  -l,  A 
z  =  0  ,  At=13.  With  these  values,  then  the  code  string  generated 
i  s  : 


D5VVVDSVDSDTTTTTTTD 

0011101100000011010 


where 


D  =  Delimiter  bit 
S  =  Sign  bit 
V  =  Value  bit 
T  -  Time  bit 

Examination  of  the  above  sequence  shows  that  the  A  * 
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codewords  are  prefix  codes  as  shown  in  the  tree  diagram  of 
I  i  .  -  0  .  To  decode  the  sequence  correctly,  however,  it  is 
imperative  that  codeword  synchronization  be  maintained  in 
order  to  determine  when  the  coded  A  2  values  end  and  the 
uncoded,  7  bit  At  variable  starts.  This  loss  of 
synchronization  is  detected  by  the  ''error''  state  shown  in 
the  code  tree  of  Figure  8.  The  decoder  which  implements  the 
code  tree  in  Figure  9  will  not  be  discussed  here  but  is 
listed  in  Appendix  C. 

In  contrast  with  the  Huffman  code  (see  chapter  2  and 
Ref  16)  and  the  Dower  code  to  be  discussed,  the  Tolan  code 
i s  not  constructed  using  the  apriori  know  ledge  of  the  source 
word  (i.e.  A2x,A2y,A2z)  relative  frequency  of  occurrence. 
This  means  that  the  Tolan  code  will  only  produce  bit 
compression  (bits  out/bits  in/<  1)  if  the  A2  values  are 

around  a  mean  of  zero  such  that  few  code 
words  exceed  the  8  bit,  fixed  length  value  of  the  A2  terms. 
As  will  be  shown  in  chapter  5,  the  second  order  difference 
decorrelator  does  produce  such  a  sharply  peaked  relative 
distribut ion. 

The  algorithm  which  implements  the  Tolan  variable 
length  coder  is  shown  in  Figure  10.  This  algorithm  works  in 
conjunction  with  the  Tolan  d  e correlator  in  Figure  8. 
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1  :  entry  (  A  2  x  ,  A  '  y  ,  A  '  x  ,  A  t  ) 

2  :  c  n  t  4-  0 

3:  reset  current  memory  bit,  increment  bit 
4:  if  end  of  memory, set  eon  flag  and  RETURN 
5:  cnt  4-  cnt  +  1 
6:  if  cnt=l  then  tvar  4-  A2x 

7:  if  c  n  t  =  2  then  tvar  4-  A2y 

8:  if  cnt=3  then  tvar  4-  A2z 

9:  if  cnt  >_  4  then  GOTO  18  else  GOTO  10 

10:  if  tvar  >  0  then  GOTO  11  else  GOTO  12 
11:  reset  memory  bit,  increment  bit  counters 
12:  set  memory  bit,  increment  bit  counters 
13:  if  end  of  memory, set  com  flag  and  RETURN 
14:  if  tvar=0  then  GOTO  5  else  GOTO  15 
15:  set  memory  bit,  increment  bit  counters 
16:  if  end  of  memory, set  e om  flag  and  RETURN 
17:  tvar  4-  tvar  -  1  and  GOTO  14 
17:  store  7  bit  At  counter  to  memory,  update 
18:  if  end  of  memory, set  eom  flag  and  RETURN 


Fig  10.  Tolan  Variable  Length  Encoder  /.I 


pointers 
else  GOTO  5 


and  GOTO  13 

else  GOTO  14 

else  GOTO  17 

bit  pointers 
else  RETURN 


g  o  r  i  t  h  m  . 
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0:  S  I  ART  01-  IX«.0;  DATA  UH.UXTiCK  AM)  IMMIKIIATIGN 
1 :  FIAG=Tm'=OT=nXl=nY  1-DZ1  =DX2=DY2=DZ2  =DDX=DDYM)DZ=CNT=0 
2:  If  sample  interrupt  detected  then  GOTO  3  else  GOTO  2 
3:  X (n)  4-  A/D  CD  0,  Y(n)  4-  A/D  GI  1,  Y(n)  4-  A/D  G!  2 
4:  CNT=CNT  +  1 

5:  If  CNT  =1  then  GOTO  6  else  GOTO  7 

6:  X(n-l)  4-  X(n>,  Y(n-l)  -0-  Y(n),  Z(n-l)  4-  Z(n)  and  GOTO  2 
7:  If  CNT  =2  then  GOTO  8  else  GOTO  13 

8:  DX1  4-  X(n)-X(n-1),DY1  4--  Y(n)-Y(n-1)  ,DZ1  4-  Z(n)-Z(n-1)  ,DT  4-  DT+1 
9:  If  DX1/0  OR  DY1/0  OR  DZ1/0  OR  DT  >  127  then  GOTO  11  else  GOTO  10 
10:  CNT  4-  1  and  GOTO  2 

11:  TDT  4-  DT-63,  X(n-2)  4-  X(n-l) ,  Y(n-2)  4-  Y(n-l) ,  Z(n-2)  4-  Z(n-l) 
12:  X(n-l)  4-  X(n),  Y(n-l)  4-  Y(n),  Z(n-l)  4-  Z(n)  DT  4-0  and  GOTO  2 
13:  DX2  4-  X(n)-X(n-1)  ,DY2  4-  Y(n)-Y(n-1)  ,DZ2  4-  Z(n)-Z(n-1)  ,171'  4-  DT+1 
14:  If  DX2/0  OR  DY2/0  OR  DZ2A0  OR  DT  >  127  then  GOTO  16  else  GOTO  15 
15:  CNT  4-  2  and  GOTO  2 

16:  DDX  4-  DX2-DX1 ,  DDY  4-  DY2-DY1 ,  DDZ  4-  DZ2-DZ1 
17:  If  iDDXl  >  63  then  GOTO  18  else  GOTO  21 
18:  DUMX(n)=.25X(n-l)+.75X(n) 

DUMX(n-l) =.25X(n-2) + ,5X(n-l) + .25X(n) 

DUMX(n-2)=.75X(n-2)+.25X(n-l) 

19:  X (n)  4-  DUMX(n) ,  X(n-l)  4-  DUMX(n-l) ,  X(n-2)  4-  DU?K(n-2) 

20:  DXl=X(n-l)-X(n-2) ,  DX2=X(n)-X(n-l)  and  GOTO  16 


Fig  11-a.  Dower  Collection  and  Decorrelation  Algorithm. 
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21:  If  !l)I>V|  >  63  then  GOTO  22  else  GOTO  25 
22:  DUMY(n)=.25Y (n-1)  +  .75Y (n) 

DUMY(n-l)=.25Y(n-2)+.5Y(n-l)+.25Y(n) 

DUMY(n-2)=.75Y(n-2)+.25Y(n-l) 

23:  Y (n)  -6-  DUMY(n),  Y(n-l)  4-  DUMY(n-l)  ,  Y(n-2)  4-  DUMY(n-2) 
24:  DYl=Y(n-l)-Y(n-2) ,  DY2=Y(n)-Y(n-l)  and  GOTO  16 
25:  If  iDUZl  >  63  then  GOTO  26  else  GOTO  29 
26:  DUMZ(n)=.25Z(n-l)+.75Z(n) 

DUJE(n-l) =,25Z(n-2)+.5Z(n-l) +.25Z(n) 

DIEE  ( n-2 )  = . 7  5  Z( n-2 )  +  .25Z(n-l) 

27:  Z(n)  4-  DUMZ(n) ,  Z(n-l)  4-  DlBE(n-l)  ,  Z(n-2)  4-  PIPE  (n-2) 
28:  DZl=Z(n-l)-Z(n-2) ,  DZ2=Z(n)-Z(n~l)  and  GOTO  16 
29:  If  FLAG=0  then  GOTO  30  else  GOTO  31 
30:  VLC  4-  (0:DX1,DY1,DZ1) 

31:  VLC  4-  (TTTr:DDX,nnY,DOZ) 

32:  If  MEMORY  FULL  then  STOP  else  GOTO  33 

33:  X(n-2)  4-  X(n-l) ,  Y(n-2)  4-  Y(n-l) ,  Z(n-2)  4-  Z(n-l) 

34:  X(n-l)  4-  X(n) ,  Y(n-l)  4-  Y(n),  Z(n-l)  4-  Z(n) 

35:  Tirr  4-  DT-63 ,  FLAG=1  and  GOTO  2 


Fig  11-b.  Power  Collection  and  Decorrelation  Algorithm. 
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PiM-tr  EKG  l)aj_a  Co»!£I£i  12.1. 

-he  Power  E  K  C  cor.  pression  technique,  like  t  b  e  To  1  a  n 

method,  is  a  redundancy  reduction  procedure.  The  Dower 
compressor  combines  a  zero  order  .tJLISi-  £.°m.E _io  —  operation 
with  a  second  d  j.  _f  f  e  r  e^n  c  e  leduc^lM  transformation  to 

produce  a  decorrelated  residual  frame  sequence.  This 
residual  frame  sequence  is  then  compressed  by  a  specially 
tailored  variable  length  code  whose  average  codeword  bit 
length  approaches  the  entropy  bound  wj_t^houjt  the  buffer 
overflow  problem  encountered  with  the  ''optimal''  Huffman 
code  . 


Second  Compression  Compressed 

Difference  Variable  Data 


and  Tables  Sequence 

Delta  t 
Histograms 


P  ®  1  •  The  Dower  data  collection  and 

l  c  .  .  •  elation  operation  (Fifurc  11)  begins  with  a  zero  order 

time  compression  process  where  only  those  EKG  sample  values 
(  x  ,  y  ,  z  )  which  differ  from  the  previous  sample  (Ax  or  Ay  or 
A  z  ^  0  )  are  saved  along  with  a  run  length  center  At.  This 
operation  produces  a  sequence  of  data  frames  (At:  x,y,z). 
Following  the  creation  of  the  data  frames,  a  second 
difference  with  !£££££  1  £o  _£  £  iL  15  £  number  is  performed 
generating  a  sequence  of  second  order  difference  frames 
(At:  AfX,Afy,Af7. ). 

The  Dower  algorithm  operates  on  8^  bj.J:  data,  hence  there 

are  256  potential  sj>U£££  s.vmboJ_s^  for  each  lead.  When  second 

differences  are  taken,  the  range  increases  to  1024 
2 

potential  A  symbols.  By  experimental  evidence.  Dower  and 

Berghofer  (Ref  12)  have  found  that  0  i 6  3  A*  values  are 

sufficient  to  reproduce  all  but  the  fastest  EKG  artifacts 

(e.g., pacemaker  spikes).  The  variable  length  encoder, 

therefore,  is  designed  to  expect  127  source  symbols  (values) 

and  no  more.  To  insure  the  A2  dynamic  range  of  0±63  is  not 
2 

exceeded,  the  A  values  are  limited  by  a  preprocessor  shown 
in  steps  18-26  of  Figure  11.  This  preprocessor  is 
iterative,  and  i££iv£t  saHy  modifies  the  three  sample  points 
which  produced  the  I A 2  I  >  63  until  the  A2  value  falls  within 
the  encoder  range.  With  care  taken  to  record  the  necessary 
initial  conditions  (first  x,y,z  and  first  Ax, Ay, Az), this 
second  difference  frame  sequence  now  contains  all  the 
significant  information  in  the  original  sample  sequence  with 
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reduced  j_£t.£  lJLlS.™  £  correlation. 

The  m  e  c  h  an  i  c  :■  o  f  t  i:  e  !'  o  v  t  r  dcco^rcl  a  tor  are  lest 

illustrated  by  an  example.  Figure  13  shows  three 
hypothetical  sample  sequences.  By  applying  the  rules  in  the 
proceeding  paragraph,  a  set  of  zero  order  data  frames 
(At:x,y,z)  is  formed.  That  is: 

(0:0, -1,2)  ,(0:1, 1,1)  ,(0:3, 2, 3)  ,(0:4, 3,1)  ,(3:3, 1,-3)  ,(0:1, 0-1) 
(0:-l ,-l  ,-2)  ,  (0: -2,-2 ,-l)  ,  (4: -3  ,1  ,-l) 

To  complete  the  correlation  reduction  process,  the 
second  difference  with  respect  to  frame  number  must  now  b 
performed.  This  results  in  the  set  of  second  differenc 
frames (At :  ^jx.Afy.Afz)  shown  below. 

(0:0, -1,2)  .(0:1, 2,-1)  I  (0:1, -1,3)  , (0 : -1 ,0 ,0)  .(3: -2, -3, -2;  , 

(0: -1.1, 6). (0:0, 0,-3), (0:1, 0,2), (4:0, 4,-1) 

The  data  sets  preceeding  the  verticle  bar  are  the  inj.t:aj[ 
£££d_i_tx£nx  necessary  for  reconstruction.  The  first  data  set 
is  the  first  zero  order  time  compression  sample  frame.  The 
second  frame  is  the  between  the  first  two 

zero  order  data  frames. 


9 


Fig  13.  Three  hypothetical  sample  sequences. 
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{lower  Ent  rojj;  Encoder.  The  Dower  entropy  encoder  also  uses 
variable  length  codes  for  ’he  second  stage  of  the  I  0  d  a  •  a 

compressor.  The  Dower  code,  however,  is  significantly 
different  than  the  prefix  code  used  in  the  Tolan  compression 
method. 

As  was  mentioned  previously,  the  Dower  VLC  is 
configured  for  127  source  symbols  (8  bit  A1  values).  Unlike 
the  Tolan  code,  however,  the  Dower  VLC  does  nc>i  perform  a 
1:1  mapping  between  a  single  source  symbol  and  a  single  code 
symbo 1  . 

In  the  Dower  coder,  the  source  symbols  (41. )  are  mapped 
onto  the  j>_t.a,t.e  _S£.§..£.S.  of  a  14  bit  accumulator  (A).  This 
state  space  is  partitioned  into  symbol.  tegj.on^  R.  which  are 
assigned  according  to  the  probability  of  occurrence  of  the 
source  symbols.  The  size  (llR.||)  of  the  symbol  region  Rd 
is  given  by  the  relation 

11^11  =  dSi  =  si  +  1-Si  =  Pr  ( A  | )  16384  (  2  4) 


where  s 


t  is  the  ijiiiia^i  state  of  R^  and  Sj  +  j  is  the  initial 


state  of  R ^  +  ^  .  The  initial  state,  s  ^  ,  is  also  determined 
by  symbol  probability.  The  symbol  regions  R  ..  corresponding 
to  thos  symbols  which  occur  l_.ea.si  often  are  assigned  to  the 
low  end  of  the  state  space  range  such  that  if: 


Pr(A*)  >  Pr(A*)  >  Pr(A*)  >  Pr(Aj) 


then 


*lRk||  >  [  I R  n  1 1  >  1 1 R  n  1 1  >  II  rt  j  II 

and 

Sk  >  sn  >  sm  >  sj 

This  relationship  is  illustrated  in  Figure  14.  For  those 
symbols  which  do  no  occur,  1  state  is  always 

assigned. 


1 

Rm 

Rn 

Rk 

1 

> 

y  n 

sk 

0 

16  384 

Fig  14.  Example  of  State  Space  Partition  for  4  Symbols. 

The  physical  configuration  of  the  Dower  encoder  is 
shown  in  Figure  15.  As  can  be  seen  from  Figure  15,  the 
memory  storage  buffer  for  the  encoded  data  is  contiguous 
with  accumulator  and  all  accumulator  bit  shifts  (right  or 
left)  also  shift  the  £nli.££  memory  buffer.  Right  shifting 
operations  always  shift  a  binary  0  into  the  most  significant 
bit  (MSB)  of  A. 


52 


14  Bit  Accumulator 

Memory  Storage  Buffer 

o-M  oi  i  oi  i  oooi  o  i  i  n|f 

- »  011001011101001... 

Fig  15.  Dower  Encoder  Accumulator- Memory  Buffer  Interface. 

A  source  symbol  js  encoded  by  adding  the  value  s^  to 

the  current  contents  of  the  accumulator.  If  the  value  in 
the  accumulator  is  such  that  s^+a  >  2**  .then  an  a  rjlhnie  t  k 
condition  would  occur  with  a  corresponding  loss  of 
data.  To  insure  this  overflow  does  not  occur,  the 
accumulator  is  first  right  shifted  ki  times  into  memory. 
The  value  k^  js  the  ni  _i  m  u.  m  number  o£  j>  h£  £_t  which 

would  ever  be  necessary  and  can  be  found  from  the 
inequality: 

2 1 4  <  2ki(si  +  1-Si)  <  2  1  ’  •  (25) 

The  k  ^  values  are  tabulated  in  Table  I  for  various  values  of 
ds  =  s^  +  i-sj  .  This  right  shifting  d£m£n£j>h£i  the  value  in 
the  accumulator  (i.e.,  divides  A  by  2  per  right  shift)  until 
the  value  in  A  can  be  safely  mapped  into  a  region  R.  #  jj,c 
initial  state,  s  ^  can  now  be  added  to  A  without  overflow 
occuring. 

In  some  instances,  the  maximum  shift  k  ^  would  not  be 
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-1  right  shifts  would  still  pre 


I'o  lie  terr  ir.c  v !.  ..  n  t  1  i  s.  sit  u  e.  t  i  o  n  occurs,  a  1 1.  i  r  <■' 

is  defined  where 

U-U; 

y i  =  ds-2  1  (26) 

the  excess  by  which  ds  exceeds  the  next 

ral  power  of  2. 


Table  I 

de  Variables  Per  Accumulator  Partition  Size 


Partition 

Size 

k 

y 

d  s  =  1 

mam 

0 

1 <ds  <4 

n 

ds-2 

4  <  d  s  <8 

SIS 

d  s  -  4 

8<ds  <12 

SS 

ds-8 

16<ds  <32 

n 

ds-16 

32<ds  <64 

9 

ds-32 

64<ds  <128 

8 

ds-64 

128<ds  <256 

1 

ds-128 

2  56  <ds  <512 

6 

ds-256 

512<ds  <1024 

5 

ds-51 2 

1  0  2  4  <d  s  <  2  0  4  S 

4 

ds-1024 

2048<ds  <4096 

3 

ds-2048 

4096  <ds  <81 92 

2 

d  s -40  96 

81 9  2  <  d  s <  16  3  84 

1 

ds-81 92 

value  in  A  <  y  ^  after  the  initial  k  ■  shifts, 
o  many  right  shifts  occured.  A  is  then  ]_£.£! 

and  s  j  added  to  A  without  fear  of  overflow.  If 
a  full  right  shifts  were  required.  To  insure 

'iciency  in  the  next  encoding,  however,  the 
the  accumulator  in  state  space  map  should  be 
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iXiliiX  Xu_slXXX.£fi  within  the  current  symbol  region.  This 
r  i  ’  i  justification  is  obtained  by  adding  y  .  4  s  ^  t0  \ 

whenever  A  >  y. 

—  3  x  • 

By  use  of  the  variable  y  ^  maximum  efficiency  in  the 
number  of  right  shifts  (i.e.  information  bits  stored  to 
memory)  can  be  obtained.  Dower  and  Berghofer  (Ref  12) 
assert  that,  on  _thj!  average  ,  the  number  of  right  shifts  per 
source  symbol  (  A  ^  )  will  approach  quite  closely  to  the  value 
~l°giPr(Aj)  which  is  the  ££  XX  XsXo£S’^X.Xoil  ''content''  of 
the  value  (see  appendix  I?)  . 

The  algorithm  which  implements  ;he  Dower  encoder  is 
shown  in  Figure  15.  This  algorithm  assumes  that  the 
variable  tables  for  ^^x,A£y,A^z  and  At  have  been  calculated 
from  the  second  difference  histograms. 

The  Dower  decoding  operation  is  just  the  inverse  of  the 
encoding  process.  For  decoding,  the  current  state  of  the 
accumulator  is  mapped  into  the  state  space  table  o  X  the 
£5£££HX  X-IiilS.®.  K  Jl.?Xiil!!.A.§.  (  A  t  ,  A  ^  x  ^  ^  f  y  ,  A  p  z  )  _  Once  the  correct 
region  R  .  (  ; s  determined,  then  s  ^  is  subtracted  from  A .  If  A 
<  2y.  then  one  right  shift  is  performed  followed  by  k  j  left 
shifts.  If  A  >.  2  y  ^  t  then  y  j  is  subtracted  from  A  followed 
by  left  shifts.  For  a  more  detailed  example  of  the  Dower 
encoding/decoding  operation,  the  reader  is  referred  to  Dower 
and  Berghofer  (Ref  12)  . 

Although  conceptually  more  difficult  than  the  Tolan 
VLC,  the  algorithmic  structure  of  the  Dower  entropy  encoder 
is  only  slightly  more  complex.  As  was  shown  above,  the 
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Dower  VLC  can  be  implemented  solely  with  shifting  and  table 


look  up  operations.  The  Dower  method  does,  however,  requite 

that  code  _tjkb  .!.£.£  ^  s  i  «  k  i  •  y  i  )  be  constructed  prior  to  the 

encoding  process. 

1:  Entry  (At ,A*x,AfY.AfZ) 

2:  IF  this  is  the  first  frame  stored  then  Acc4— 0  else  GOTO  3 
3:  DDVAR  4-  At,k4-  k(At),s4—  s(At),y-4-  (At) 

4:  RIGHT  SHIFT  Acc  k  times 

5:  IF  Acc  <  y  then  GOTO  8  else  GOTO  6 

6:  LEFT  SHIFT  Acc  once 

7 :  Acc  4-  Acc  +  s  and  GOTO  9 

8:  Acc  4-  Acc  +  s  +  y 

9:  IF  memory  is  full,  then  SET  eom  flag  and  RETURN  else  GOTO  10 

10:  IF  DDVAR=At  then  GOTO  11  else  GOTO  12 

2  2  2  2 
11:  DDVAR  4-  AfX  ,k  4-  k(AfX)  ,s  4-  s(AfX)  ,y  4-  y(AfX  )  and  GOTO  4 

12:  IF  DDVAR=A*X  then  GOTO  13  else  GOTO  14 

13:  DDVAR  4-  A*y>k  <-  k(AgY)  ,s  4-  s(AgY)  ,v  4-  y(AfY  )  and  GOTO  4 

14:  IF  DDVAR=Afy  then  GOTO  15  else  RETURN 

15:  DDVAR  4-  A*z  ,k  <-  k(A*Z)  ,s  4-  s(AfZ)  ,y  4-  y(A*Z  )  and  GOTO  4 

Fig  16.  Dower  VLC  algorithm. 
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Toja^n  ]).£*.£.£ 

The  similarites  and  differences  between  the  T  o 1  a n  and 
Dower  EKG  compression  techniques  are  now  discussed.  The 
decorrelators  are  compared  first. 

Both  the  Dower  and  the  Tolan  dccorrcl a t  or s  use  a  sceond 
difference  technique  where  _t  _i  co5£Ifili5I  is  used  to 
eliminate  the  storing  of  the  most  common  A2  value  of  zero. 
The  Tolan  algorithm,  however,  continuously  calculates  the 
second  difference  and  applies  these  differences  to  the  Tolan 
VLC.  If  a  long  ''run''  of  A2  =0  values  occur,  the  Tolan 

encoder  overflows  at  At=128.  This  run  counter  overflow 
forces  a  storage  ''dump''  to  the  VLC  with  a  resultant  loss 
in  efficiency. 

The  Dower  decorrelator  approaches  time  compression 
slightly  differently.  In  the  Dower  algorithm,  only  those 
sample  points  where  the  EKG  data  was  changing  (i.e., 
Ax.or.Ay.or.Az/0)  are  saved  forming  data  frames.  A  second 
difference  with  respect  to  frame  number  is  performed  and 

the  Aj>s  and  At  are  fed  to  the  VLC.  Although  this  frame 

methodology  appears  more  efficient  than  the  Tolan  technique, 
the  Dower  decorrelator  is  still  constrained  by  a  maximum  At 
of  127  (i.e.,  maximum  Dower  VLC  code  range).  On  the  basis 

of  this  analysis,  is  appears  that  both  the  Tolan  and  the 
Dower  decorrelators  have  similar  performance. 

Since  the  Tolan  and  Dower  decorrelators  appear  about 
equally  efficient,  the  real  compression  payoff  is  in  the 
variable  length  encoders.  In  the  Tolan  VLC,  code  words  as 
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long  as  1  0  2  4  •*-  2  bits  are  feasible.  These  long  codewords 
v  o  r.  1  \  occur  if  an  extrc  r.  cl  y  1  :■  r  r  e  arc'  fast  '  ’  s  p  i  1:  e  ’  ' 

(e.g.  a  pacemaker  pulse)  appeared  in  the  data.  In  the 
population  as  a  whole,  spikes  of  this  magnitude  occur  very 
infrequently.  Nevertheless,  the  Tolan  compression 
efficiency  will  degrade  seriously  in  an  enviroment  where 
''impulsive'1  artifacts  appear. 

The  Dower  VLC  is  designed  to  minimize  sensitivity  to 
impulses.  In  the  Dower  system,  the  VLC  is  configured  such 
that  the  1_  2.  c.o  (i.e.,  the  number  of  right  shifts 
to  memory)  is  14  bits.  Extremely  large  signal  spikes  are 
numerically  filtered  to  reduce  their  second  difference 
within  the  0+  63  range.  Such  drastic  limiting  action  would 
occur  infrequently,  however,  and  not  seriously  affect  the 
reproduction  of  the  F. KG. 

As  an  example  of  their  performance,  let  a  second 
difference  of  45  be  encountered  by  both  the  Tolan  and  Dower 
encoders.  The  Tolan  VLC  would  require  47  bits  to  encode 
this  data.  The  exact  codeword  size  of  the  Dower  routine  is 
dependent  on  the  A  1  =45  probability  of  occurrence. 
Nonetheless,  the  ''codeword''  is  always  14  bits  long  ;  an 
obvious  increase  in  efficiency  over  47  bits. 

A  calculation  of  the  performance  differential  between 
the  Tolan  and  Dower  routines  will  be  estimated  in  chapter  5. 
For  now  it  is  sufficient  to  say  that  the  Dower  LKC 
compressor  outperforms  the  Tolan  method.  A  short  synopsis 
will  now  be  made  of  two  other  FKG  compression  techniques. 
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I '  r  "  i  c  r  e-pu  ter  [  r’  C  or  p  r  c  s  s  «;•  r  s  . 

Two  other  F  K  (1  compression  techniques  were  discovered  by 
this  author.  The  first  is  referred  to  as  the  Turnyn^  Poj^nt. 
Me..thod  and  is  discussed  in  reference  32.  The  second  method 
is  currently  in  use  by  Marquette  Electronics  for  data 
compression  in  a  commercial  E  K  0  '’cart'*.  The  Turning  Point 

technique  is  presented  first. 

XHTU-iHil  Ef-AHt.  Aill!!  •  The  turning  point  algorithm  is,  by 

definition,  a  2:1  data  compressor  where  one  of  two 
consecqutive  sample  points  is  discarded.  The  algorithm 
which  determines  which  sample  point  is  discarded  is  as 
follows.  The  first  sample  point  is  stored  and  assigned  as 
the  reference  point  (  X  0  )  .  Th e  next  two  consecqutive  points 
become  Xj  and  Xi  .  With  3  sample  points  there  are  8 
''paterns''  or  combinations  which  reflect  the  ''trends''  in 
data  (see  Figure  17).  The  Turning  Point  algorithm  stores 
the  circled  point  (Figure  17)  which  becomes  the  new 
reference  point  X0  #  The  point  not  circled  ( X  i  or  Xj)  is 
discarded.  The  next  two  points  are  sampled,  their  values 
are  assigned  to  X  t  an(j  x  2  ,  and  the  process  repeated. 
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It  can  be  shov.-n  (Ref  32:6.59-6.65)  t  li  a  t 


if(X2-Xi)*(X1-X0)<0  X0=Xi 
if  (X3  -  Xi)*(Xi  -  X0)  10  X  o  =  X  2 

hence  the  sign  of  the  product  of  consecqutive  first 
differences  determines  the  1  '  si  gni g ican t  '  '  point  to  be 
saved. 

The  advantage  of  the  Turning  Point  compressor  is  speed 
of  execution.  Execution  of  this  algorithm  on  even  the 
slowest  microprocessor  would  pose  no  problem  at  all.  The 
disadvantages  of  the  turning  point  routine  are  numerous, 
however.  First  the  routine  discard^  data  so  that 
reconstruction  of  the  original  sample  sequence  is  not 
possible.  In  this  regard,  the  Turning  Point  algorithm  falls 
in  the  class  of  Entropy  Reducing  (ER)  techniques  as  was 
discussed  in  chapter  2.  Second  no  attempt  is  made  to  use  the 
probabilistic  distribution  of  the  F.KG  to  enhance  data 
compression  as  is  done  with  the  Tolan  and  Dower  routines. 
This  obviously  leads  to  inefficiency.  Finally,  this  routine 
only  produces  a  2:1  compression  ratio;  incredibly  poor  in 
relation  to  the  other  techniques  already  discussed  in  this 
thesis.  Only  where  the  s  t  technique  is  necessary, 

would  the  Turning  Point  technique  be  beneficial. 

Ma_rqu^_t_t(i  A  l_.go  r^_t  hm .  The  Marquette  algorithm  was  developed 
by  Marquette  Electronics,  Milwaukee,  Wisconsin.  This 
similar  to  the  Dower  and  Tolan  algorithms  in  that  variable 
length  encoding  is  used  to  compress  the  output  of  a 
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'  'difference  '  '  decorrelator. 

In  contrast  to  tie  Dower  and  T  o 1  a  n  techniques,  the 
Marquette  compressor  only  calculates  the  first  difference 
for  input  into  the  VLC.  The  Marquette  variable  length 
encoder  stores  the  first  difference  data  as  1,3,5, or  7 
nibbles  where  a  nibble  is  defined  as  4  bits.  These  nibble 
codes  are  arranged  as  follows: 


Ennnn  D_i  Xijg. t n n £  n 

(-7,7) 

( -127 , 1 27 ) 

( -2047  ,2047  ) 
(-3  27  67  ,  3  27  67  ) 


Code.  Len.g._t  h  j.n  EjbbJ_e^ 

1 

3 

5 

7 


To  encode  the  first  differences,  and  delineate  between  code 
words,  the  folio  wing  rules  apply: 

1)  Differences  must  be  coded  on  the  smallest 
possible  range,  and  attempts  to  encode  a 
difference  of  +5,  for  example,  using  more  than  1 
nibble  will  result  in  a  decoding  error. 

2)  Single  nibble  codes  are  difference  plus  8.  A 
nibble  value  of  zero  does  not  occur. 

3)  Three  nibble  codes  start  with  a  single  zero 
nibble.  The  remaining  two  nibbles  are  obtained  as 
follows: 

(1)  Positive  Differences  +8 

(2)  Negative  Differences  +7 

4)  Five  nibble  codes  start  with  two  zero  nibbles. 

The  remaining  three  nibbles  are  obtained  as 
follows: 

(1)  Positive  Differences  +128 

(2)  Negative  Differences  +127 


5)  Seven  nibble  codes  start  with  three  zero 
nibbles.  The  remaining  four  nibbles  are  obtained 
as  follows: 


(1)  Positive  Differences  +2048 

(2)  Negative  Differences  +2047 

6)  The  sequence  of  nibbles  in  a  code  starts  with 
the  zero  flag  nibbles  (if  any)  followed  by  the 
most  significant  through  least  significant 
nibble. 

The  above  set  of  encoding  rules  were  obtained  from  Mr.  Tom 
Divers,  Marquette  Electronics  project  engineer  (Ref  11). 

From  their  own  analysis,  Marquette  has  shown  (Ref  11) 
that  at  a  250  Hz  sampling  rate,  89.1  percent  of  the  first 
differences  fall  within  the  ±  7  range  with  99.8  percent 
falling  within  a  ±  127  range.  Marquette  reports  that  at  an 
A/D  precision  of  10  bits,  an  average  of  4.89  bits/sample 
(across  the  total  EKG  population)  is  obtained  with  their 
compression  routine. 

The  Marquette  EKG  compression  appears  to  wort  well, 
even  with  a  first  order  difference  correlation  reducer.  The 
Marquette  variable  length  encoder  ,  however,  is  tailored  to 
the  8  bit  ASCII  data  communications  enviroment  and  is  not 
''optimum''  in  any  sense.  The  Marquett  VLC  does  perform 
''exact''  redundancy  reduction  entropy  compression  with 
sufficient  efficiency  to  make  this  encoding  scheme 
commercially  viable. 

C hjip t_ e^£  i l.i  Summary  . 

This  chapter  has  looked  in  detail  at  two  IKG  data 
compression  techniques  which  perform  ’’exact  '  '  redundancy 
reduction.  The  Tolan  routine,  which  was  implemented  by  this 
author  (see  chapters  4  and  5)  decorr elated  the  sample 
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sequence  data  by  performing  a  second  order  time  compression 
operation.  The  residual  sequence  resulting  fr  or  tie 
decorrelator  was  ''compressed*'  by  a  uniquely  decodable 
variable  length  code  which  was  shown  to  be  '  '  subopt  imal  '  ' 
with  respect  to  the  ''optimal'*  Huffman  code. 

The  Dower  compression  technique  al.o  performed  a  second 
difference  operation,  but  preceeded  the  second  order 
1  '  di  f  f er encer  '  '  by  a  zero  order  time  compressor.  Th  e  Dower 
zero  order  time  compressor  produced  a  sequence  of  ''data 
frames'*  which  in  turn  were  converted  to  a  sequence  of 
second  order  difference  frames  with  respect  to  frame 
number.  Since  the  Dower  VLC  limited  the  At  time  compression 
counter  to  a  maximum  of  127  (as  did  the  Tolan  VLC),  input 
symbols,  the  Dower  and  Tolan  decorrelators  were  considered 
to  perform  equally  well.  The  Dower  entropy  encoder  was  also 
shown  to  be  a  variable  length  coding  operation  but  not  a 
''prefix'*  code  as  was  the  Tolan  VLC.  The  Dower  VLC  maps 
decorrelator  '’symbols''  into  the  ''state  space''  of  14  bit 
accumulator  which  encodes  data  by  adding  the  initial  address 
of  a  symbol's  state  space  region  to  the  accumulator.  To 
prevent  accumulator  overflow,  the  accumulator  data  is 
shifted  out  to  a  memory  storage  buffer.  The  ''number  of 
shifts''  necessary  to  prevent  accumulator  overflow  represent 
the  codeword  size  and  it  was  shown  that  the  Dower  VLC 
approached  the  ’'entropy''  bound  of  the  decorr elated  input 
sequence . 

The  chapter  was  concluded  by  a  synopsis  of  two  other 


64 


EKG  compression  techniques.  The  first  of  these  two, the 
Turning  Point  algorithm,  was  shown  to  be  of  i.  a  1  r  i  n  a  1  use 
because  it  is  not  an  ''exact''  technique  and  produces 
compression  of  only  2:1.  The  second  technique,  however, was 
the  Marquette  compression  system  and  it  was  shown  to  produce 
acceptable  compression  worthly  of  commercial  application. 

From  the  available  algorithms,  the  Dower  compression 
technique  has  the  capacity  to  produce  the  best  ''exact'' 
compression  of  any  of  the  techniques  studied  in  this 
chapter.  An  interesting  experiment  would  be  the  combining 
of  the  second  order  interpolator  (discussed  in  chapter  2) 
used  by  Ruttiman  and  Pipberger  (Ref  28)  and  the  variable 
length  encoder  used  by  Dower  (Ref  12).  This  combination 
should  prove  to  be  very  powerful  and  effective  and  is  left 
for  futhcr  study. 

The  next  chapter  in  this  thesis  discusses  the 
configuration  of  the  EKG  Da._ta  Acgays  t^ion  and  AnsiJ_y.s_iy  System 
assembled  b)r  this  author  to  test  the  Tolan  EKG  compression 
algorithm. 
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E  KG- D.a  Xil  Aj:qu  j.  t^  o  n  and  Ana^Xilij.  Si-Sli-m 


IV  . 


The  EKG-Data  Acquisition  and  Analysis  System  (EKG-DAAS) 
was  assembled  for  this  thesis  as  the  testbed  on  which 
experimental  F.  KG  data  could  be  acquired,  compressed, 
analyzed, stored,  and  reconstructed.  The  EKG-DAAS  design  can 
be  separated  into  the  categories  of  hardware  and  software. 
The  hardware  is  discussed  first. 


FKG-DAAS  Hardware. 


The  EKG-DAAS  was  constructed  around  the  Motorola 
Exorciser  microcomputer  (appendix  H)  which  uses  a  6800 
microprocessor  for  its  central  processing  unit  (CPU).  In 
the  EKG-DAAS,  the  Exorciser  is  configured  with  32  kilobytes 
(  K  )  of  read/write  (RAM)  memory  and  16  K  of  read  only  memory 
(ROM).  In  addition,  the  Exorciser  was  equiped  with  the 
EXBUG  debuging  module  which  allowed  interactive  program 
debugging  with  p r e s e  1  e c t a b  1  e  software  breakpoints,  execution 
tracing  modes,  and  CPU  register  display. 

To  provide  extended  memory,  a  Midwest  Scientific 
Instruments  (MSI)  FD-8  Disk  Memory  unit  was  interfaced  to 
the  Exorciser  and  provides  approximately  290  K  of  online 
user  memory.  The  FD-8  is  accessed  by  a  MSI  Disk  Operating 
System  (DOS)  and  communicates  with  the  CPU  via  a  MEX6820 
Input/Output  Module  installed  in  the  Exorciser  chassis. 
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Terminal  input/output  (I/O)  is  accomplished  by  means  of  a 


s  ;  a  n  d  a  r  C  11  S  -  2  3  2  serial  ini  erf  a  e  e  v  I  i  c  h  1:  a  s  s  v  itch  select;!  1  t 

baud  rate  from  110  to  9600  baud.  In  the  EKG-DAAS 
configuration,  the  Exorciser  serial  ''port''  was  connected 
in  parallel  with  a  Heathkit  11-14  dot  matrix  line  printer  for 
program  listings  and  data  printouts. 

Data  I/O  was  accomplished  by  means  of  a  Sinetrac 
ST-6800  Analog/Digital-Digital/Analog  (A /  D-  D- A)  converter 
module  which  samples  and  digitizes  analog  data  to  12  bit 
precision.  The  ST-6800  has  the  capability  of  sampling  32 
distinct  analog  channels  (A/D)  as  well  as  output  2  channels 
(D/A)  with  simple  memory  addressed  LDA  (load)  and  STA 
(store)  instructions.  For  the  EKG-DAAS,  the  ST-6800  was 
setup  for  ±  5  volt,  2's  compliment  data  and  »as  addressed 
(A/D  ch  0)  at  E400  Hexadecimal  (  Hex  )  .  The  internal 
configuration  of  the  Exorciser  as  used  in  the  EKG-DAAS  is 
illustrated  in  Figure  18. 

To  uniformly  sample  the  EKG  input  data  via  the  ST-68O0 
required  the  use  of  an  external  jn^crru])t  as  is  shown 

in  Figure  19.  This  timer  allowed  data  sampling  rates 
between  300  and  700  Hertz  but  for  the  duration  of  this 
research  was  set,  and  calibrated,  at  500  Hertz.  The 
interrupt  was  interfaced  to  the  Exorciser  via  an  intcirupt 
line  on  the  ST -6800. 

Considerable  problems  arose  in  this  thesis  due  to 
hardware  problems  associated  with  the  ED -8  Disk  Memory.  The 
original  configuration  of  the  EKG-DAAS  used  two  ED-8  systems 
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Fig  19.  EKG-DAAS  Hardware  Configuration 


Further  information  concerning  the  F.  xorciser's  hardware 
capability  can  be  obtained  in  appendix  F,  and  reference  22. 
Attention  is  now  turned  to  the  F.KG-DAAS  software. 

FK G^D A A S  S  oX_t  w  a££  . 

The  F.KG-DAAS  software  was  written  in  6800  assembly 
language  and  controls  all  aspects  of  terminal,  dish  memory, 
and  A/D-D/A  operation.  The  E  K  G  - 1)  A  A  S  programs  consist  of 
approximately  4  3^0  0  1  _in  of  assembly  language  and  arc  listed 
in  appendix  C. 

The  software  used  in  the  F KG- DA  AS  was  written  in  6  80  0 
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assembly  language  for  two  reasons:  1)  no  h_ijyh  order  language 
M.  ,  Fd": 1  •  ;-\  :  ;  r. 1  ■  1  e  on  1'.  !'  i .  r  e  i  e  r  ;  ;  : 

2)  speed  limitations  imposed  by  the  thesis  requirement  for 
jo  _n  Jl  _i  _n  ^  ,  £.ejL_l  iiine.  FKG  data  compression  made  it  imperative 
that  the  compression  programs  run  as  fast  as  possible.  The 
laborious  task  of  writing  and  testing  assembly  language 
slowed  software  development  to  the  point  where  only  one  F,  KG 
data  compression/reconstruction  routine  (Tolan)  was 
completed. 

The  F.KG-DAAS  software  is  integrally  tied  to  the  MSI  DOS 
(Ref  23).  All  disk  I/O  operations  initiated  by  the  F  K  (i  -  0  A  A  S 
routines  flow  through  the  MS  I -DOS  and  hence  the  DOS  must  be 
''live1'  somewhere  in  memory.  To  insure  that  the  DOS 
routines  are  always  available,  the  DOS  was  disassembled  and 
relocated  in  high  memory  ROM  (C400  Hex). 

The  basic  flow  of  E  K  (i  -  D  A  A  S  program  control  is 

illustrated  in  Figure  20.  The  F,  KG  - DA  AS  software  is  broken 

into  over hved  modules  which  are  called  into  memory  and 
executed  by  EKG-EXEC  and  DISPLAY.  The  basic  memory  map  and 
overlay  structure  is  illustrated  in  Figure  21. 

As  can  be  seen  in  Figure  21,  extensive  m en o ry 

SULUjiill'Ei'.Ei  was  required  in  order  to  allow  a  sufficiently 
large  memory  buffer  for  the  FKG  data.  As  configured  in 
Figure  21,  the  F.  KG-DAAS  could  collect  11.6  seconds  of 
121  onijirc  s  s  ed  (3  leads, 8  bits /  lead, 500  samples  /  sec)  FKG 
data.  For  compression  with  the  Tolan  algorithm,  a  maximum 
of  26.2  seconds  of  data  (TA1359PA,  appendix  D)  was 
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.Disk  Operating  System 

.Debug  Monitor  Program 

.Modified  MSI  BASIC  Interpreter 

. EKG-DAAS  Executive  Program 

.Data  Collection  Without  Compression 

.Data  Collection  With  Compression  (Tolan  algor) 
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•Statistic  Printout  Driver 

.Amplitude  Histogram  Printout  Driver 

.Amplitude  Histogram  Oscilliscope  Display  Driver 

.Reconstruction  and  Display  Module 

.TOLAN  Reconstruction  and  Display  (Oscilliscope) 


Fig  20  EKG-DAAS  Software  Control  Flow  graph. 
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Fig  21.  E  K  G  -  D  A  A  S  Overlay  Structure  ami  ' .  e  :a  o  r  \ 
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defined,  this  chapter  will  now  examine  the  components  of  the 
EKG-DAAS  software  in  more  detail.  In  the  next  section  of 
this  chapter,  a  software  module  will  be  described  along  with 
a  simplified  flowchart  of  that  module's  operation. 


i:  (i-  r  x f  r  . 


F  K  G  -  E  X  E  C  is  t  h  e 


cxectuive  connam]  module  w  h  i  c  h 


O'  a  ll  v  !  s  L  h  c  f  sc  n:  i  i  i1  »  I  i  u  ..  i  tie  i  ..  F  -  1  A  S  s  \  »  I  v .  I  ; 

input  of  a  command  number,  F  K  (i  -  F.  X  F.  C  loads  the  appropriate 
overlay  routine  into  the  program  work  buffer  (0100-11)00  Ilex) 
and  then  passes  control  to  that  overlay.  The  above  command 
and  control  operation  is  illustrated  in  Figure  22. 

In  addition  to  the  command  '  'handler'  EKG-EXEC 
contains  the  utility  subroutines  F  I  L  II D  R  ,  SAVF1I.  ,  H  X  A  S  C  , 
0  V'  RL  A  V  ,  and  PDFPRT.  These  subroutines  are  described  as 
follows: 


FILHOR.  FILIIDR  clears  the  memory  data  buffer, 

initializes  the  statistics  buffer  variables,  and 
queries  the  console  for  data  such  as 

FILENAME , SUE  JECT , DATE, etc  . 

S A VEIL.  SAVFIL  reads  the  filename  in  the  memory 

buffer  header  and  then  writes  the  memory  file  to 
disk.  Disk  I/O  is  passed  through  EOS 

sub  rout ines  . 

II^ASC.  This  subroutine  converts  hexadecimal  data 
to  ASCII  for  display  on  the  terminal  and  p  r  ..  t  e  r 
devices. 

0  Y  B  L  A  Y  •  0VRLAY  is  the  routine  which  actually 
performs  the  overlay  function.  After  an  overlay 
is  loaded  into  memory,  OVRLAY  jumps  program 
control  to  the  overlay  program. 

PDFPRT.  PDFPRT  prints  the  amplitude  distribution 
to  the  terminal  device  (printer).  Although 
resident  in  EKG-EXEC,  PDFPRT  is  called  only  by  the 
DISP..AY'  module. 


INITIALIZE 


EKG-EXEC  Functional  Flowchart 


NOCPRS.  NOCPRS  is  a  data  acquisition  module  in  which  the 
1:.  K  (i  waveform  is  sampled  and  stored  w  _i  _t  h  o  _u  _t  data 

compression.  The  data  is  rounded  to  8  bits  from  12  bits. 
The  reason  for  this  rounding  is  explained  in  chapter  5. 

This  module  was  constructed  for  two  reasons  :  1) 

uncompressed  data  was  considered  uaeful  for  doing 
experimental  studies  on  potential  data  compression 
techniques  implemented  the  original  data  collection 

session  and  ;  2  )  t  h i s  module  was  the  structure  around  which 

the  Tolan  (and  potentially  other)  compression  routines  were 
built.  The  basic  operation  of  NOCPRS  is  illustrated  in 

Figure  23. 

As  is  seen  in  Figure  23,  NOCPRS  does  more  than  just 

sample  the  EKG.  Statistical  parameters  are  collected  and 
updated  during  an  EKG  data  collection.  These  parameters  are 
used  to  measure  the  r £ a^  1_  .t i.m e^  performance  of  the  compression 

(no  compression)  software.  A  detailed  description  of  these 
measurement  parameters  is  described  in  chapter  5. 
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Fig  23.  NOCPRS  f'unctional  Flowchart. 
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DISPLAY.  DISPLAY  is  a  command  module  similar  in 

a  i  n.  c  t  ion  to  1'.  Kt>- LX1-.C  .  DISPLAY  controls  the  data  jiuLitt_ 
modules  which  display  the  sampled  E  K  0  data  and  data 
statistics  to  two  output  devices.  Th  e  first  device  is  the 
terminal  (printer)  and  the  second  device  is  an 
oscilloscope.  The  basic  command  structure  of  DISPLAY  is 
shown  in  Figure  24.  DISPLAY  is  broken  into  5  working 
submodules.  These  modules  are  described  as  follows: 


PRSTAT  .  This  submodule  reads  the  memory  file 
header  (3COO-3POO  II  ex),  formats  the  statistical 
data  found  there,  and  prints  this  data  to  the 
terminal  (printer).  The  statiscal  data  in 
appendix  D  was  generated  by  PI’STAT. 

PfiEZEJ*  This  submodule  prints  the  memory  file 
histogram  tables  to  the  terminal  (printer). 
PDFPRT  output  is  also  listed  in  appendix  D. 

EUEQ.H1  ■  P  D  F  O  U  T  scans  a  user  selected  lead 
histogram  ( X , Y , Z )  and  formats  the  data  for  display 
to  an  oscilloscope.  The  data  is  output  via  D/A  ch 
0.  An  example  of  PDFOUT  output  is  found  in  Figure 
31  in  chapter  5. 

DECPR S .  The  DECPRS  module  scans  the  memory  file 
header  and  identifies  the  compression  technique 
which  was  used  to  encode  the  data  in  memory.  The 
appropriate  dec  o  mj)  r  c  s  s  i  o  n  algorithm  is  then 
selected  and  the  data  decoded  and  output  on  D/A 
channel  0  . 

LEAD.  LOAD  initiates  a  data  file  load  from  disk 
memory  to  RAM.  This  load  is  performed  by  EOS 
routines  called  by  load. 
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DISPLAY  Functional  Flowchart 


1  £*  L  A  ll!  •  The  TOLAN  module  is  the  ''heart''  of  the  E  K  G  - 1)  A  A  S 
ai!i  performs  the  actual  data  compression  on  the  sampled 
EKG.  As  was  described  in  chapter  3,  the  TOLAN  algorithm 
first  performs  a  second  difference  time  compression 
operation  followed  by  a  variable  length  encoder.  The 
operation  of  the  TOLAN  compression  module  is  shown  in  Figure 
25  . 

To  detect  sample  clock  (or  CPU  clock)  drift,  time 
calibration  operations  are  performed  prior  to  and  after  the 
data  collection  run.  Other  statistical  data  parameters  are 
also  collected  allowing  post  collection  measurement  of 
compression  performance. 
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!•'  i  g  2  5b.  T  O I ,  A  N  Functional  Flowchart 


82 


S  umm 


This  chapter  has  presented  an  overview  of  the  complex 
software  which  makes  up  the  EKG-DAAS.  The  reader  is 
referred  to  the  program  listings  in  appendix  C  for  a  more 
thorough  description  of  the  program  operation. 

The  software  structure  in  the  EKG-DAAS  was  written  in  a 
''Top  Down''  manner  and  all  attempts  have  been  made  to 
document  the  operation  of  each  routine.  Since  assembly 
language  is  difficult  to  read,  this  chapter  was  written  to 
assist  the  reader  in  understanding  the  basic  structure  of 
the  EKG-DAAS.  The  next  chapter  presents  the  results  of  the 
EKG  experiment  where  data  was  collected,  analyzed,  and 
compressed  by  the  EKG-DAAS. 


V  . 

E2i.E££-i!5££  1  £  1 
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a  n 

F.  KG  collection 

e  x  p  e 
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t  / 

in  v 

i  vo  '  ' 
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data 
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taken  from  test 

s  ub  j 

ects  in  real 

t  i 

m  e  . 

Data 

was 

take 

n  a 

nd 

stored  in  both 

compressed  and  uncompressed  formats  for  later  analysis  and 
reconstruction. 

Chapter  5  is  organized  as  follows.  First  the 
''experimental''  setup  is  described  along  with  a  description 
of  the  EK.G  equipment,  collection  enviroment,  and  subject 
personnel.  Next  the  parameters  used  to  determine 
compression  performance  are  defined  followed  by  the  analysis 
and  results  of  the  experimental  data.  Finally,  the  chapter 
concludes  with  a  comparison  between  the  r  e  .s  u  _1  t.  _s  obtained 
using  the  Tolan  compression  algorithm  and  the  £  ,s_t  .imaged 
££rf^  ££IQ£11££  °f  the  Dower  technique.  Discussion  now  turns  to 
the  experimental  procedure. 

E-5.££  £  j.m£££iii  P££££dure 

The  data  was  taken  from  a  set  of  nine  fellow  students 
during  a  laboratory  course  on  electrocardiograms.  The 
equipment  used  to  produce  the  F.  KG  was  the  model  DR -12 
research  recorder  built  by  Electronics  for  Medicine, 
I  n  c  .  (  s  e  e  appendix  F,  )  .  The  D  R  -  1  2  is  a  vintage  medical 
recording  system  built  in  the  late  1  9  5  0  '  s  and  is  constructed 
with  vacuum  tube  amplification  circuitry. 

The  personnel  used  for  test  subject  were  all  Air  Force 
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officers  in  good  physical  health. 


No  test  subjects  with 


\  it.  v.  s  V-  e  art  <1  i  s  e  a  r.  e  v  -  v  e  i  .•  -■  C  1  t  o  «  ;  h  s  i  t-  i  r.  i  f  i  e  :•  r  t  '  ■ 

variations  between  subjects  was  noted  (Tig  27-29).  Output 
of  the  DR-12  was  limited  to  one  EKG  signal  which  could  be 
switched  to  any  of  the  6  ’’limb  leads’’  (Ref  13:29-34)  by 
controls  on  the  DR-12.  The  electrodes  of  the  EKG  were 
applied  to  the  wrists  of  the  test  subjects  and  in  some 
cases,  not  all,  an  electrode  jelly  was  applied  to  reduce 
skin-electrode  resistance. 

Since  the  EKG-Data  Acquisition  and  Analysis  System 
(EKG-DAAS)  was  configured  for  a  3  lead  system,  the  X  ,  Y  ,  Z 
inputs  were  connected  in  common  and  the  single  signal 
available  from  the  DR -11  applied  to  this  connection.  A 
Brush  Instruments  Mark  II  recorder  and  a  Tektronics  Model 
4  6  5  M  Oscilloscope  were  used  as  analog  output  devices 
(Appendix  E).  The  display  instruments  were  connected  in 
common  with  the  A/D  inputs  as  is  shown  in  Figure  26. 

Prior  to  the  data  recording  session,  the  A/D  was 
calibrated  in  accordance  with  the  operating  manual  (Ref  8). 
The  A/D  was  configured  for  a  dynamic  range  of  of  -5.000 
volts  to  +4.9976  volts  with  2’s  complement  binary 
representation. 

The  actual  data  collection  proceeded  as  follows.  first 


the 
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and 
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Fig  2  6.  Experimental  Data  Collection  Setup. 


F.  KG  - HAAS)  and  the  lead  with  the  least  ’’noisy'1  signal  was 
selected.  EKG-DAAS  was  then  executed  and  a  data  collection 
made  w_i_t_hout.  compression.  This  uncompressed  data  collection 
was  followed  as  soon  as  possible  with  another  1  1  run"  in 
which  the  Tolan  compression  algorithm  was  enabled. 
Folio  wing  both  data  collections  (uncompressed  and 
compressed),  the  raw  data  traces  from  the  Brush  recorder 
were  annotated  with  the  time  and  subject  and  filed  'or  later 
data  comparison  with  the  reconstructed  waveform. 

The  data  was  stored  on  ’’floppy’’  diskettes  and 
processed  post  collection  for  the  entropy  and  maximum 

Before  the  results  o  t  these  data 
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compression  statistics. 


collections  are  presented,  the  compression  measurement 
;  r  a ;  will  be  e  f  i  ;  .  .  . 

F  K  Ci  C  c>  mppe  j>  jiyo  n  A!££.§.£Jl£E£I)i  Eii££!5£A£Jl  j> 

To  permit  determination  of  compression  performance,  a 
set  of  statistical  parameters  was  calculated  and  saved 
during  each  data  collection.  These  statistical  parameters 
are  described  as  follows: 

Number  of  Samples.  This  statistic  was  saved  to 
determine  the  total  number  of  bits  that  were  input 
to  the  compression  stages.  The  total  number  of 
bits  were  calculated  by  (8  bits/sample)* 

3  leads )*(n urn  of  samples  / lead). 

2£d  Difference  i:  £  £  £  u  e  n  c  v  o  _f  0  cc  cr  c  r.  c  e  .  Four 
frequencies  of  occurrence  tables  were  .apt  wit h 
double  precision  binary  counters.  hollowing  the 
data  collections,  these  A  x  ,  A  y  ,  A  z , A  t  histogram 

tables  were  input  to  a  I!  A  S  f  C  program  (  T  A  T  R  /’  V  ) 

where  the  entropy  of  second  difference  ’'source'1 
was  calculated. 

I'!£  L££r  County  I)  _u  r_|n  :  Co  li££t_  jon  .  A 

counting  loop  was  established  in  t  h  e  '!  0 1.  A  N 
compression  module  which  allowed  determination  of 
the  percent  of  the  sampling  period  used  for  the 
compression  and  statistics  calculations.  One 
circuit  of  this  counting  loop  takes  4b  machine 
cycles  of  the  6800  microprocessor.  A  cent  of  the 
total  number  of  loop  cycles  completed  f  ol  lnwj.nr 
the  sampling /compression  interrupts  is  kept  in  the 
collection  statistics  buffer. 

M  ^  _x  _i  rn  _n  rn  Loop  fount  P££  I  n  t  e  r£ttn_t  .  To  offset  the 
inaccuracy  which  would  develop  if  the  i n t  e r r u  p i 
clock  period  changed  between  runs  (or  i  I  t  h  .■ 
master  clock  in  the  Fsorc  i  sc  r  drifted),  a  ’  -  ■  -> 
count  calibration  was  performed  immediately  r  ■  ■  t  re 
and  after  each  collection  run.  This  c  a  1  i  >  i  .  .  r. 
was  accomplished  by  performing  2  5  (>  sequential 
interrupts  with  no  interrupt  proecssiu  e  \  .•  c  p  t 
return -  from  -  interrupt.  The  before  and.  alter 
calibration  counts  were  then  aver  a  r  <■  d  a  n  d  t  r  e 
maximum  loop  counts  per  interrupt  calculated. 

T  _i  m  c  F.f  f_i  c  i  e  n  e  y  of  the  compression  <>  p  e  ratio  t)  K  ■.  e 
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then  calculated  from  the  equation: 

T.E.=(l-(Total  loop  Count/((Num  of  S  a  m  p  1  e  s  )  *  (  M  a  x  Cnt))))*100 

Channel  JliilSSSi  and  M_i  n_i  m  u  .  The  channel 
maximums  and  minimums  were  retained  to  allow 
determination  if  the  analog  inputs  exceeded  the 
A/D  dynamic  range. 

Number  o  _f  M  e_m  o_ry  B_i_t£  A  v  a^i.1.  a  b^£  .  This  number  was 
constant  and  was  determined  by  the  amount  of 
Read/Write  (RAM)  memory  available  for  data 
storage.  For  the  current  configuration  of  the 
Exorciser  and  the  EKG-EXEC  program  this  was  139248 
bits  (17406  bytes). 

Number  of  B_i  _t  j;  Av  a  j.  e  t^o  I'afilHe  L  e  £  h 

Coder .  This  counter  measured  the  number  of  bits 
out  of  the  data  decorrelator  and  allowed 
calculation  of  the  decorrelator's  compression 
ratio  (bits  out/bits  in). 

Numb °X  Bill  U.££<J  1,0  Store  Cha.n n^_l  X,Y,Z.  These 
counters  measured  the  number  of  bits  used  to  store 
the  data  from  the  three  input  leads.  This  count 
is  the  number  of  code  bj.t.£  out  of  the  variable 
length  encoder. 

Number  o£  B  j.  lA  Used  £  o  Store  Time  .  This  counter 
was  identical  to  the  channel  counters  above  but 
measured  the  number  of  code  bits  used  to  store 
the  At  run  counts. 

To_t  a  X  Comgre^ion  Eiili.2  A  £  h_i  e:v£d  .  This  figure  was 
calculated  post  collection  by  dividing  the  total 
code  bits  stored  by  the  total  R  /  W  memory  bits 
available. 

The  statistical  data  defined  above  was  compiled  by  the 
EKG-EXEC  program  and  is  printed  by  the  DISPLAY  software 
module  as  illustrated  in  appendix  D. 
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Fig  27.  Original  and  Reconstructed  EKG  with 
Best  Compression  Ratio  (2.260  :  1) 
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Fig29  .  Original  and  Reconstructed  EKG  with 
Worst  Compression  Ratio  (1.252  :  1) 
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Da.t  a  Anjil^js  j..s  and  R.e.s  uj^£^ 

To  determine  the  compression  efficiency  of  a  redundancy 
reduction  EKG  compression  algorithm  is,  in  general,  a 
difficult  job  to  accomplish.  The  reasons  for  this 
difficulty  are:  1)  the  sampled  EKG  data  sequence  contains 
significant  correlation  (memory)  between  sample  values 
making  calculation  of  the  absolute  bound  of  the  entrogy 
extremely  difficult  (Ref  34:479-489)  and  ;  2)  the  techniques 
used  for  both  the  data  decorrelator  and  entropy  encoder  vary 
significantly  from  algorithm  to  algorithm. 

In  this  thesis,  as  is  done  in  the  literature  (Ref 
7,12,28),  the  assumption  is  made  that  the  output  of  the 
decorrelator  is  '’almost  d e c o r r e 1  a t e d '  '  .  Decorrelated  is 
not  ''independent'*  (unless  the  source  was  statistically 
gaussian),  but  it  is  assumed  that  true  entropy  of  the  2nd 
difference  sequence  approaches  the  value  which  would  be 
calculated  by  Eq.(l)  (reproduced  below). 

A2  entropy  =  -  )  -p.log,p.  (27) 
L  l  *  i 

<P  .  is  the  probability  of  the  i ' th  second  difference). 

l 

This  second  difference  entropy  can  then  be  used  as  an  upper 
bound  on  the  potential  entropy  encoding  compression  of  the 
Tolan  redundancy  reduction  technique. 

The  A  1  entropy  values  tabulated  in  Tabic  II  were 
calculated  by  Eq.(27).  To  calculate  the  jL12£  £  o  x_i  m  c  limit 
on  the  entropy  encoder's  comjiressjon  ££  t,_i° ,  the  uncompressed 
data  word  length  of  8  bits  was  divided  by  the  ’’lowest'' 
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aver  ?pc  code  wort*  (  i  .  e  .  ,  t  li  c.  2nd  difference  entropy)  ,  A 

look  at  Table  II  shows  that  the  entropy  encoder  compression 
ratio  varied  between  58  To  and  7 1  of  this  entropy  bound. 
Since  the  Tolan  variable  length  code  is  suboptimal,  a  lower 
efficiency  is  expected.  Nevertheless,  the  Tolan  entropy- 
encoder  performed  more-or-less  consistently  across  the  data 
set.  This  last  observation  would  imply  that  the  data 
d  ®  £  influences  the  overall  compression  ratio  more 


Table  II 

Experimental  Data  Summary 


Subject 

Id 

2  'nd 

Difference 

Entropy 

Maximum 

Compression 

Possible 

(Approx) 

Achieved 

2nd 

Difference 

Compression 

Percent 
of  Max 
Encoder 
Comprs 

Percent 
of  Sample 
Interval 

Achieved 

Total 

Comprs 

TA1545T 

3.2801 

2.42  :  1 

mm 

64.0% 

93.9% 

1.36  :  1 

TA1548T 

3.0171 

2.63  :  1 

B 

61 .2% 

91.4% 

1.50  :  1 

TA1559B 

3.016 

2.64  :  1 

1.72  :  1 

65.1% 

93.0% 

1.53  :  1 

TA1511S 

3.323 

2.39  :  1 

1.65  :  1 

69. 03b 

94.0% 

1.43  :  1 

TA1520B 

2.601 

3.06  :  1 

1.81  :  1 

59.1% 

90.9% 

1.72  :  1 

TA1448L 

2.930 

2.72  :  1 

n 

63.6% 

90.6% 

1.60  :  1 

TA1439S 

3.267 

2.43  :  1 

199 

67.1% 

93  .4% 

1.43  :  1 

TA1359P 

2.487 

3.22  :  1 

B 

58.3% 

77.8% 

2.26  :  1 

TA1413L 

3.783 

2.10  :  1 

BH 

71 .4% 

95.4% 

1.2.5  :  1 

than  the  entropy  encoder. 

As  was  described  in  chapter  3,  the  Tolan  data 
decorrelator  uses  time  compression  in  conjunction  with  a  2nd 
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iliii  i'  rencc  operation.  The  Tolan  tine  c  or.ipr  e  s  s  i  o  n  technique 

makes  the  assumption  that  the  second  difference  value  of 
zero  occurs  so  frequently  that  the  encoding  of  0  would  be 
less  efficient  than  the  storing  of  a  zero  value  run 
counter.  In  the  experimental  situation  in  this  thesis, 
signal  noise  was  quite  evident  in  the  EKG  traces  (Fig  29). 
The  sharp  ''spikes'*  induced  by  noise  are  accentuated  by  the 
second  difference  operation,  hence  a  0  was  a  common 
occurrence.  This  forced  the  storage  of  a  lot  of  7  bit  time 
counters . 

In  8  out  of  the  9  compression  runs  made,  the  frequent 
storage  of  time  counts  actually  caused  the  Tolan  data 
decorrelator  to  produce  n.eciaj:_ive  compression  (i.e.  more 
bits  out  than  went  in).  Since  the  entropy  encoder  was 
producing  a  larger  positive  compression  ratio,  the  overall 
compression  figure  remained  positive.  The  effect  of  this 
operation  is  graphically  illustrated  in  Figure  30. 

A  look  at  the  original  and  reconstructed  EKG  traces 
(Fig  27-29)  in  conjunction  with  the  data  in  Table  II,  shows 
that  as  the  ''noise'*  level  increased  on  the  signal  the 
compression  became  progressively  worse.  Since  it  was 
concluded  that  the  entropy  encoder  performed  approximately 
the  same  across  the  data  set,  the  degradation  in  total 
compression  must  be  due,  in  large  degree,  to  the  degradation 
in  the  Tolan  time  compression  data  decorrelator 
performance . 

A  clear  effect  of  the  noise  is  illustrated  in  Figure 
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3  j  .  !•'  r  o  r.i  F  i  5  u  r  c  3  1,  i  l  cur,  h  e  seer.  I  h  t  as  the  ''noise'' 

level  increased  the  variance  of  the  2nd  difference 
distribution  became  increasingly  larger.  As  the 
distribution  became  less  peaked,  the  efficiency  of  the 
variable  length  encoder  decreased  with  a  subsequent  loss  in 
achieved  compression  ratio. 

The  nonzero  component  at  A1  =  0  in  Figure  31  can  be 
explained  as  follows.  The  decision  was  made  early  in  the 
design  of  the  EKG-DAAS  that  8  bit  data  would  be  used  versus 
9  or  10  as  recommended  by  the  American  Heart  Association 
(Ref  3).  This  decision  was  made  to  simplfy  the  software 
(i.e.  single  precision  could  be  used).  Since  the  A/D 
converter  has  12  bit  resolution,  the  sample  was  rounded  to  8 
bits  for  uniform  error  distribution  (Ref  24:424-432). 
Unfortunately  because  of  this  rounding  action,  small 
differences  in  the  least  significat  bits  of  the  A/D 
converter  may  have  affected  the  rounding  operation.  Since 
the  A/D  cannot  sample  all  three  channel  simultaneously,  the 
probability  that  a  ''noisy''  signal  will  change  the  least 
significant  bit  (or  bits)  is  high.  With  a  rounding 
operation,  these  changes  may  ripple  to  affect  the  least 
significant  bit  of  the  8  bit  data. 

At  most  this  effect  would  only  cause  a  change  in  the 
least  significant  bit  of  the  8  bit  rounded  values.  This 
would  cause,  however,  the  second  differences  between  of 
channel  X , Y , Z  to  be  different  even  though  they  were 
connected  in  common.  As  was  described  in  chapter  3,  a.ny  of 
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the  three  leads  with  a  non  zero  second  difference  forced  ire 
storage  of  all  three  data  points.  Hence  many  zeros  data 
points  were  stored  because  of  2nd  difference  asymmetry  which 
would  not  have  occurred  had  the  12  bit  A/D  data  been 
truncated  instead  of  rounded. 

This  fact  undoubtably  affected  the  overall  compression 
efficiency  of  the  Tolan  algorithm.  Nonetheless,  the 
distribution  in  Figure  31  would  not  have  changed  (except  the 
zero  value  count)  significantly  and  noise  would  still  have 
broadened  the  2nd  difference  distribution. 

To  ji  n  and  Dower  C  om^a^xj.  son 

As  has  been  reiterated  several  times  in  the  text  of 
this  thesis,  the  author's  original  intention  was  to 
implement  both  the  Dower  and  the  Tolan  algorithms  for 
experimental  test  and  comparison.  Since  time  did  not  permit 
the  Dower  implementation,  an  experimental  comparison  was  not 
possible. 

As  an  attempt  to  compare  the  results  of  the  Dower  and 
Tolan  compression  routines,  the  results  quoted  from  the 
papers  by  Dower, Derghofer, and  Stewart  (Ref  12,29)  will  be 
used.  Dower  states  that  his  state  space  variable  length 
encoder  approaches  the  entropy  bound  of  the  second 
difference  source  1  'with  about  1  .  6  5  r>  wastage''  (  !.  e  f  12:3). 
This  value  is  significatlv  higher  than  the  approximately  3  OS 
''wastage''  observed  with  the  Tolan  variable  length 
encoder. 
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Assuming  similar  o  ;  »  i  a  t  i  o  a  s  of  the  second  difference 

time  compression  (in  this  author's  ''noisy''  enviroment), 
the  Dower  decorrelator  is  expected  to  have  neqative 
compression.  With  the  Tolan  and  Dower  decorrelators  assumed 
’’equal'',  then  the  real  gain  of  the  Dower  technique  over 
the  Tolan  approach  is  in  the  VEC. 

Assuming  the  Dower  entropy  encoder  approached  closely 
to  the  entropy  bound,  it  can  be  extrapolated  that  the  Dower 
algorithm  would  have  achieved  a  maximum  compression  of 
approximately  (1.2)*(3.22)=3.86:1  for  the  ''best''  EKG  in 
Table  II  and  Figure  30.  The  worst  compression  ratio  would 
have  been  (.84)*(2.1)=1.76*1  for  the  worst  (noisest)  EKG. 

Ch _a£!_e_r  5,  Summary 

This  chapter  began  with  a  description  of  the  EKG 
collection  experiment.  Although  the  EKG  apparatus  was 
limited  to  one  channel,  sucessful  collection  and  compression 
of  EKG  data  was  performed.  Analysis  of  the  data  revealed 
that  time  compression  is  inefficient  in  a  1  'noisy'  ' 
enviroment  and  that  ''rounding''  of  the  12  bit  A/D  samples 
in  conjunction  with  placing  all  three  sample  lead  in  common 
accentuated  the  degradation  caused  by  the  time  compression 
data  dccorrelator.  Nonetheless,  the  Tolan  algorithm  did 
achieve  an  overall  positive  data  compression  figure  but 
significantly  lower  than  the  9:1  ratio  achieved  by  Ruttiman 
and  Pipberger  (Ref  28)  or  the  .a  v  c  r  ji  £  £  value  of  7.3:1 
reported  by  Stewart, Derghofer,  and  Dower  (Ref  29).  Finally 
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it  Has  hcuristically  shown  that  if  the  Dower  compression 
algorithm  lived  up  to  the  statements  by  Dower,  then  a 
compression  ratio  gain  of  3,86:1  to  2.26:1  could  have  been 
achieved  with  the  Dower  EKG  data  compression  technique. 
This  thesis  will  now  proceed  to  provide  conclusions  and 
recommendations 
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VI.  Summary  ,  Co  n£_l  u^JL  o  n£  ,  and  Bi£ommenda  tyons 

Summary  and  Cose  UsioM 

This  thesis  has  investigated  the  field  of 
electrocardiogram  data  compression  with  the  objective  of 
evaluating  compression  algorithms  on  a  6800  microprocessor 
based  computer  system.  Accomplishment  of  this  goal  required 
the  construction  of  the  EKG-Data  Acquisition  and  Analysis 
System  utilizing  the  Motorola  Exorciser  microcomputer. 

To  determine  those  EKG  compression  algorithms  which  had 
potential  for  Exorciser  implementation,  a  literature  search 
was  made  to  locate  EKG  data  compression  techniques.  In 
addition  to  the  literature  search,  personal  correspondence 
(Ref  11,31)  yielded  several  EKG  compression  algorithms.  The 
results  of  this  research  is  presented  in  chapter  2. 

Since  thesis  requirements  dictated  the  need  for  an 
online,  real  time  data  compression  algorithm,  only  the 
fastest  EKG  compressors  could  be  considered.  Two  routines 
were  selected  for  detailed  analysis  and  inplementation. 
These  two  compression  algorithms  (Tolan  and  Dower)  were 
discussed  at  length  in  chapter  3. 

It  was  deduced  from  the  methodology  of  the  two  data 
compression  techniques  that  the  Dower  algorithm  would 
perform  better  than  the  Tolan  procedure.  To  test  this 
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1  y  p  o  t  h  o  s  i  s  ,  the  I  K  (!  -  !'  \  S  v  a  s  constructed  a  n  d  the  To  !  .  r 

algorithm  implemented.  The  implementation  of  the  FKG-DAAS 
is  documented  in  chapter  4. 

Time  constraints  prohibited  completion  of  the  Dower 
compression  algorithm,  but  data  was  succssfully  compicsssed, 
analyzed,  and  decompressed  with  the  Tolan  algorithm.  The 
results  of  this  analysis  are  presented  in  chapter  5. 

The  conclusions  of  this  research  effort  are  as 
follows.  First,  FKG  data  compression  can  be  accomplished  in 
real  time  by  a  microprocessor  based  computer  system.  The 
Eiorciser  is  a  slow  microcomputer  (1  MHz  cycle  time)  yet  it 
was  still  possible  to  implement  the  Tolan  algorithm  with  a 
500  Hz  sample  rate.  The  second  conclusion  is  that  signal 
noise  can  dramatically  affect  the  efficiency  of  the  F.  KG 
routines  in  the  same  class  as  the  Tolan  algorithm.  The 
expense  and  implementation  difficulties  of  p r e f  i  1 t e r  i  n g ,  1 ow 
electromagnetic  noise  environment,  and  proper  FKG  lead 
attachment  are  well  worth  the  gain  in  compression  achieved. 
Finally,  a  software  project  of  this  magnitude  should  not  be 
attempted  totally  in  assembly  language.  Although  assembly 
language  offers  the  greatest  flexibility  and  speed, 
algorithm  implementation  and  debugging  efforts  are 
enormous.  A  high  order  language  would  have  allowed  this 
author  to  complete  his  original  thesis  objectives. 
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V  '  cor-e^da  t.j,ons 

Several  recommendations  are  offered  for  further  study 
in  microcomputer  based  EKG  data  compression.  First, 
implementation  of  the  EKG  compression  algorithms  using  a  16 
bit  microprocessor  (e.g.  6  MHz  Intel  8086)  would  permit  an 
order  of  magnitude  improvement  in  speed  of  execution. 
Hardware  multiply  and  divide  along  with  16  bit  arithmetic 
registers  would  permit  easy  implementation  of  the  Dower 
algorithm  and  would  even  make  use  of  the  Transform 
compressors  (i.e.  FFT)  feasible.  Second,  futher  study  is 
needed  on  determination  of  decorrelator  inefficiency  on  the 
overall  data  compression.  A  large  study  of  different 
decorrelators  such  as  1,  2,  3  difference  operations  with  and 
without  time  compression  is  needed.  Next,  an  EKG 
compression  algorithm  implemented  using  the  Ruttiman  and 
Pipberger  2nd  order  interpolator  (Ref  28)  for  the 
decorrelator  along  with  the  Dower  variable  length  encoder 
(Ref  12)  should  be  built.  This  combination  should  prove  to 
be  very  efficient.  Finally,  programming  and  experimental 
testing  should  be  done  on  a  full  scale  microcomputer 
development  system,  complete  with  a  high  order  language, 
A/D-D/A  capability,  and  flexible  disk  file  manipulation 
software.  Such  a  system  is  the  Zilog  MCZ1/25  microcomputer 
resident  here  at  A.F.I.T. 
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Th£  EJ^£_t  r  oc  £i£d_i  oj>  j"jim 


r  o  d  u  c_t  J.  o  n 

The  electrocardiogram  (or  EKG)  is  a  record  of  the 
electrical  activity  of  the  heart  as  measured  from  the  body 
surface.  The  magnitude,  shape, and  timing  of  the  electrical 
potentials  generated  by  the  heart  reveal  a  great  deal  of 
information  concerning  the  health  of  the  cardiac  system. 
This  appendix  will  describe  how  the  electrical  signals  from 
the  heart  are  generated,  how  the  cardiac  cycle  is 
coordinated  and  controlled,  and  finally  how  the  F  K  G  can  be 
used  as  a  diagnostic  tool. 

The  Physio J^o£v  and  EJI^c  Jt  T_i  c.A.ai  Ch jarji£ t. ££_i _s.ti.es. 

£X  t. h£  IlXilXX 

The  heart  (Fig.  Al)  is  an  organ  about  the  size  of  a 
fist  with  four  main  pumping  chambers  and  a  specialized 
electrical  conduction  system.  At  the  top  are  two  thin 
walled  pumps  called  the  atrium  which  prime  the  main  pumps  of 
the  heart,  the  ventricles.  The  ventricles  are  Separated  by 
a  thick  wall  of  muscle  tissue  called  the  septum.  i'lood  from 
the  right  ventricle  goes  to  the  lungs  and  blood  from  the 
left  ventricle  goes  to  the  rest  of  the  body. 
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Fig  A1 .  The  Heart  Cross-Section  (From  Ref  20:291). 

During  the  resting  state  between  contractions,  the 
cells  of  the  heart  are  ''polarized''  with  an  electrical 
potential  existing  between  the  inside  (-)  and  the  outside 
(+)  of  the  cell.  This  potential  is  generated  by  an  ionic 
gradient  across  the  cellular  membrane  and  is  normally 
maintained  for  approximately  .2  to  .4  of  a  second  before 
spontaneous  ''depolarization''  occurs.  Depolarization 
(caused  by  an  inrush  of  sodiun  ions  into  the  cell)  induces 
the  cell  to  contract  for  approximately  1/4  of  a  second. 
Because  all  heart  cells  contain  specialized  conducting 
fibers,  the  depolarization  of  one  cell  initiates  the 
depolarization  of  neighboring  cells  and  a  ’'wave  of 
excitation'*  sweeps  across  the  myocardium  (heart)  at  a  rate 
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o  f  about  1  meter  per  second. 

T  h  o  voltages  measured  at  t  !i  e  body  surface  are  tie 
superposition  of  thousands  of  heart  cells  depolarizing  (or 
polarizing)  as  the  wave  of  excitement  flows  through  the 
myocardium.  Early  work  by  Wilson  (Ref  20:292)  showed  that 
the  heart  could  be  represented  by  an  equivalent  electrical 
dipole  whose  vector  orientation  sweeps  through  a  closed  loop 
during  one  cardiac  cycle.  In  simple  terms,  as  the  wave  of 
excitement  flows  toward  a  positive  skin  electrode,  a 
positive  slope  is  generated  on  the  E  K  G  record  representing 
the  projection  of  the  heart  vector  onto  the  axis  of  the  EKG 
lead. 

To  observe  this  sweeping  dipole  vector,  Wilson 
developed  the  12  lead  EKG  system  in  almost  univcrisal  use 
today.  This  system  (Fig.  A2)  attempts  to  measure  the  heart 
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vector  orientation  and  amplitude  is  difficult.  To  overcome 
this  problem,  Frank  (Ref  14:737-749)  developed  the  vector 
cardiogram  which  combines  7  leads  in  a  summing  network  to 
produce  three  orthogonal  components  of  the  heart  vector. 
Frank  VCG  systems  are  popular  in  heart  diagnosis  and 
research  because  all  of  the  information  is  contained  in 
three  leads  of  data  versus  12. 
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tissue.  The  S  A  node  hence  initiates  a  wave  of  excitation 
which  covers  the  atrium  in  about  80  milliseconds.  This 
atrial  contraction  produces  the  electrical  signal  called  the 
P  wave  (Fig.  A3)  on  a  typical  E K G  record. 

The  wave  of  excitation  started  by  the  SA  node  then 
reaches  another  specialized  receptor  known  as  the 
Atrial  - Ventricular  (AV)  node.  Here  connecting  fibers  delay 
the  excitation  impulse  for  about  50  milliseconds  to  allow 
the  ventricles  to  fill  with  blood.  After  the  50  millisecond 
delay,  the  excitation  signal  is  relayed  to  special 
conducting  fibers  in  the  septum  known  as  the  Bundle  of  Bis. 
These  conducting  fibers  rapidily  (30  ms)  transmit  the 
excitation  wave  to  the  interior  (endocardium)  wall  of  the 
ventricles  where  the  wavefront  propagates  radially  to  the 
outer  wall  (epicardium)  in  another  30  milliseconds.  The 
ventricular  wave  of  excitation  produces  the  QRS  waveform 
complex  seen  on  the  EKG . 

Following  the  ventricular  contraction,  the  muscle  cells 
of  the  ventricles  repolarize  over  a  period  of  100 
milliseconds.  No  muscular  action  is  occuring  but  the  EKG 
responds  to  this  electrical  activity  and  the  T  wave  is  noted 
on  the  EKG  record.  Atrial  repolarization  occurs  during  the 
QRS  hence  it  is  generally  invisible  on  the  EKG. 


Fig  A3.  Typical  Ek'd  Ifaveform  (From  Ref  20) 


Finally  the  heart  rests  for  approximately  .2  of  a 
second  and  the  cycle  starts  again.  The  above  cardiac  cycle 
is  typical  of  a  healthy  heart.  Disease,  however,  can  effect 
this  sequence  dramatically. 


Heart  Disease  and  the  EKG 


The  variety  of  ailments  which  plauge  the  human  heart 
are  numerous  and  no  attempt  will  made  to  describe  the 
spectrum  of  diseases  possible.  There  are,  however,  several 
common  heart  defects  which  routine  EKG  analysis  usually 
detects.  These  include  premature  contractions  (Atrial  and 
Ventricle),  bundle  branch  blocks,  hypertrophy,  and 
infarction. 


Pjre  E  ®  .ture  C  o  n  t^r  a^c^  t_J_o  n  s^  .  Premature  contractions  are  caused 
by  the  spontaneous  depolarization  of  heart  tissue  outside  of 
the  SA  node.  Th  is  depolarization  initiates  a  wave  of 


excitement  causing  the  atrium, or  more  notably,  the 
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ventricles  to  contract  out  of  r  h  y  t  1.  n  with  their  normal 


tide,  Points  where  this  '  'unscheduled'  '  depolarization 
occurs  are  called  ectopic  foci  and  can  arise  because  of 
infarct  damage  (to  be  disscussed  later), coronary  heart 
disease  producing  oxygen  starvation  and  a  number  of  other 
causes.  Premature  Ventricular  Contractions  ( P  V  C '  s )  arc 
highly  visible  on  the  EKG  record.  Normally  the  ventricles 
contract  simultaneously  and  the  voltage  vectors  generated 
tend  to  cancel  keeping  the  QRS  amplitude  relatively  small. 
A  PVC,  however,  causes  depolarization  of  one  ventricle 
before  the  other  generating  an  unbalanced,  hence  larger, 
voltage  output. 

R  u  n  d  Branch  B_lo£k  .  A  bundle  branch  block  is  caused  by  a 
block  of  the  impulse  of  the  right  or  left  Bundle  Branch. 
This  causes  a  delay  in  the  transmission  of  the  stimulation 
impulse  to  ventricle  blocked  and  forces  the  two  ventricles 
to  contract  at  slightly  different  times.  This  difference  in 
ventrical  contraction  time  shows  up  on  the  EKG  as  a  double 
humpe  d  QRS . 

II  .2  £  Jl  y  .  Hypertrophy  is  an  enlargment  of  one  section  of 

the  heart  muscle  tissue.  This  enlargment  affects  the 
duration  and  strength  of  the  wave  of  excitement  and  is 
visible  on  the  EKG  record  as  a  diphasic  trace  if  atrial 
hypertrophy  is  present.  If  ventricular  hypertrophy  exists, 
the  QRS  amplitudes  are  much  larger  than  norma]  due  to  the 
fact  that  more  tissue  is  depolarizing. 


1  ;■  j__.  on  .  Myocardial  infarction  is  an  i  n  j  u  r  y  to  the  heart 

t  c a u  s  e J  b  y  an  feel u sian  of  a  earn n  a r  y  a r  I  c  r  y  .  An  area 

of  the  heart  is  then  without  a  blood  supply  and  often 
permanent  damage  occurs.  This  heart  disease  is  often  the 
one  most  conmonly  called  a  ''heart  attack''  and,  as  is  well 
known,  is  many  times  fatal.  If  a  person  survives  the 
orginal  ''attack'',  then  this  permanent  damage  shows  up  in 
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S umm^£Y . 

This  appendix  has  briefly  examined  the  physiology  of 
the  heart  and  discussed  how  the  myocardial  tissue  generates 
the  electrical  fields  measured  by  the  electrocardiogram. 
Though  EKG  analysis  has  been  practiced  for  fifty  years, 
intense  research  continues  in  improving  EKG  diagnosis. 
Dramatic  improvement  in  computer  aided  EKG  analysis  and 
better  understanding  of  the  electro-physiology  of  the  heart 
is  leading  to  improved  cardiac  health  care  worldwide. 

The  heart  diseases  discussed  above  are  only  a  small 
subset  of  the  problems  which  can  afflict  the  human  heart. 
Should  the  reader  desire  a  more  thourgh  background  on  heart 
physiology  and  cardiac  disease,  Dubin's  book  (Ref  13)  is 
highly  recommended.  This  programmed  text  carefully  leads 
the  reader  through  EKG  analysis  and  is  easily  read.  For  a 
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with  the  terminology  used  in  describing  the  data  compression 
techniques  in  chapters  2  and  3  .  The  appendix  begins  with  a 
review  of  the  information  source,  proceeds  to  a  discussion 
of  the  transmission  channel  and  Shannon's  rate  distortion 
theory,  and  concludes  with  a  description  of  the  system 
encoder/decoder  . 

Source 

For  his  initial  analysis.  Shannon  proposed  modelling 
the  information  source  as  a  discrete  stochastic  process 
whose  output  is  governed  by  known  statistics.  As  pointed 
out  by  Davisson  and  Gray  (Ref  10:  2-4),  the  di  screte-time 
model  was  commonly  used  for  any  or  all  of  the  following 
reasons:  (1)  digital  communication  links  have  become  common 
place;  (2)  a  continuous  time  process  can  be  modelled  as 
discrete  by  sampling,  orthogonal  function  expansion,  or 
waveform  segmentation;  (3)  greater  simplicity. 

The  source  is  characterized  by  a  finite  set  of  possible 
outcomes  known  as  its  alphabet  A.  The  occurrence  of  a 
particular  alphabet  symbol  is  governed  by  probabilistic 
descriptors  (i.e.  probability  density  functions)  and  it  is 
assumed  that  the  source  produces  only  one  symbol  from  the 
alphabet  every  T  ^  seconds.  Hence  the  information  source  has 
a  symbol  rate  of  Rs=l/T$  symbols  per  second. 

The  next  question  of  interest  is  how  much  information 
is  conveyed  by  the  occurrence  of  a  given  source  symbol ?  If  X 
is  a  discrete  random  variable  occurring  at  time  t,  and  x  is 


an  element  of  A,  then  the  random  variable  ,S£XX  Xl!X£!IIQ.3.iii2.D 
c  .  :  e  defined.  That  is 

I(x)=-log  p{X=x}  (B.l) 
where  p{X=x}  is  the  probability  that  X=x. 

According  to  this  description,  the  less  probable  an  event 
is,  the  more  information  is  conveyed  when  it  occurs.  The 
base  of  the  logarithm  is  unspecified,  but  in  this  thesis  it 
is  assumed  to  be  base  2.  Hence  the  occurrence  of  symbol  x 
reveals  I(x)  bj._t£  of  information. 

The  amount  of  information  received  per  observation  is 
of  interest,  but  one  would  like  a  measure  of  the 
''uncertainty'*  or  ''randomness''  of  the  source.  If  the 
stochastic  process  defining  the  source  is  considered 
stationary  (a  pretentious  assumption  but  one  generally  made) 
then  the  output  of  the  source  is  a  sequence  of  random 
variables  with  identical  probabilistic  descriptors.  The 
probabilistic  descriptor  will  be  defined  as  { u  )  and  could 
represent  the  moments  of  the  random  variable  or  its 
probability  density  function  (PDF).  If,  in  addition,  the 
source  is  considered  ergodic,  then  statistical  averages 
equal  time  averages  and  calculation  of  the  set  {  u  )  is 
greatly  simplified. 

Given  that  the  discrete  process  is  ergodic,  or  at  least 
stationary,  then  the  source  output  at  any  time  is  described 
by  the  random  variable  X  with  range  A=(x(l),x(2j,...x(n)}. 
The  measure  of  the  ''uncertainty''  or  1  1  ranuonnes  s'  '  is 
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c  c  lined  as  the  £  P  _t  _r  o  p  v  of  the  source  and  is  given  by  the 
lion 


where  p  is  the  probability  of  occurence  of  the  discrete 

i 

value  x  .  If  p  =0,  then  the  term  log  1/p  is  defined 

i  i  1  i 

equal  to  0  (i.e.  no  contribution  to  the  entropy).  Should 

the  range  A  be  of  infinite  extent  (i.e.  a  continuous 
source),  then  the  above  series  may  not  converge  nor  would 
p  (  x  )  necessarily  be  defined.  In  this  case,  n(X)  is  defined 
as  positive  infinity. 

As  example  (Ref  19:15),  let  X  represent  the  outcome  of 
a  single  roll  of  a  fair  die.  Then  A={1,2,3,4,5,6]  and  p 

i 

=  1/  6  for  each  i.  Here  H(X)=  ^  1/6  1  o  g  2  6  =  2.58  bits. 

6 

In  the  above  example,  the  statistics  governing  the 
occurrence  of  a  given  outcome  were  uniform.  This  represents 
the  ''most  random''  case  with  a  resultant  maximum  of  the 
entropy  function.  Should  the  die  be  ''loaded'',  then  the 
predicted  outcome  is  ''less  random’’  and  hence  the  value  of 
H(X)  would  be  reduced. 

The  next  important  component  in  Shannon's  communication 
model  is  the  transmission  channel. 
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discrete  memory  less  channel  (DMC)  as  depicted  in  Figure 
•  '  ~  .  1  h  e  !-  ’!('  js  d  e  s  c  r  i  b  e  d  n  a  t  h  ei  i  a  t  i  c  1  1  v  b  v  a  c  o  r  J  i  t  i  o  v.  a  1 

probability  which  relates  the  chance  that  a  given  output  y 
was  the  result  of  a  given  input  x.  If  the  input  to  the 
channel  is  a  random  variable  X,  and  the  output  is  a  random 
variable  Y,  then  a  quantity  called  conditional  entrogj  can 
be  defined.  The  equation  defining  conditional  entropy  is: 


11  (  X  I  Y  ) 


n  n 

x=l  y= 1 


(B.3) 


For  a  given  pair  X,Y  of  random  variables,  II  ( X  I Y )  represents 
the  amount  of  uncertainty  remaning  about  X  after  Y  has  been 
observed . 

Now  since  II  (  X  )  represents  the  uncertainty  about  X 
before  X  is  known  and  II  (  X  I Y  )  represents  the  uncertainty 
after,  the  difference  II  (  X  )  —  IJ  (  X  I  Y  )  must  represent  the  amount 
of  information  provided  about  X  by  Y.  This  quantity  is 
called  the  iju  N  a  1  between  X  and  Y,  and  is 
denoted  by  : 

I  (X;Y)=II(X)-I1(X  I Y  )  (B  4) 

With  the  above  definitions  in  hand,  the  most  important 
quantity  of  a  communications  channel  can  be  described;  that 
quantity  is  the  channej.  c.ajDa£.i_ty.  Channel  capacity  is 
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defined  as  the  maximum  amount  of  information,  per  unit  of 
time,  which  car.  be  ’'reliably'*  transmitted  over  tic 

channel .  Tha  t  i s  : 

C=max {I (X;Y) }  (B  6) 

Channel  capacity  is  closely  related  to  another  important 
parameter  of  a  communication  system  known  as  the 
r a t e -d i s t or t i o n  function. 

R  a,  1  Ei-S  1  £1.11  °2  •  Shannon  postulated  the  existence  of  a 
mathematical  distortion  measure,  d(X,Y),  to  measure  the 
distortion  or  loss  resulting  if  a  source  symbol  X  is 
reproduced  as  Y.  Unfortunately  this  abstract  distortion 
measure  is  difficult  to  quantify.  As  stated  by  Berger  (Ref 
4:6),  '’the  unavailablity  of  a  distortion  measure  that  is 
both  physically  meaningful  and  analytically  tractable 
constitutes  one  of  the  major  obstacles  to  progress  in 
(communication)  system  design.'' 

Assuming  one  has  such  a  distortion  measure,  then 
associated  with  most  source-user  pairs  is  a  function  R  ( D ) 
called  the  rate  distortion  function.  The  rate  distortion  is 
important  in  that  it  gives  the  designer  a  mathematical  tool 
to  measure  the  amount  of  distortion  that  can  be  expected  for 
a  given  transmission  rate.  A  communication  system  can 
achieve  a  given  fidelity  D  i_£  ji  n  d  onJ.Y  _if  the  capacity  C 
exceeds  R(D).  Hence  R(D)  is  the  effective  rate  at  which  the 
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li  (  \  )  ,  is  less  than  or  equal  to  the  channel  capacity  C  ,  then 

traps  r.  iss  on  wit  |-  /  e  r  »•  e  •  i .  >  r  i  ..  i:  h  e  «■  h  :  a  i  t:  e  i!  .  T):  i  ■'  a  r  a  :•  t  : 

result  is  not  without  cost,  however.  To  reduce  the  source 
entropy  (as  seen  by  the  channel)  requires  £  od_i  .  i?Jl£ode£ 

In  most  circumstances,  the  output  of  the  information 
source  is  not  suitable  for  direct  input  into  the  channel. 
To  match  the  source  to  the  channel,  much  like  matching 
impedances  in  circuit  theory,  is  the  job  of  the  encoder. 

The  encoder  incoporates  all  of  the  functions  which 
process  the  source  data  for  transmission  over  the 

communication  channel.  This  includes  coding, 

analog-to-digital  conversion,  and  modulation.  In  order  to 
transmit  without  loss,  integers  K  and  L  must  exist  such  that 
KTs-LTc.  This  guarantees  that  the  received  sequence  { Y )  has 

the  same  j>.ynbo_l  rai_tc:  as  the  transmitted  sequence  (X). 

As  illustrated  in  Figure  B -  1  ,  the  endoder  is  divided 
into  two  functional  subunits.  The  first  of  these  subunits 
is  the  source  encoder. 

^£H£££  Encod^£.  Source  encoding  is  the  operation  by  which 
the  source  output  is  mapped  into  an  alterate  symbol  set  with 
the  goal  of  reducing  source  sequence  dependence  (i.e. 
reduce  redundancy).  Source  coding  is  the  transformation  in 
which  data  ££2H£Sli££  occurs. 

The  first  source  codes,  as  conceived  by  Shannon,  were 
£1  o£k  ££^.££  where  blocks  of  source  symbols  were  mapped  into 
a  single  representative  channel  symbol.  This  type  of 


125 


encoding  is  sir,  pie,  but  efficient  only  if  the  source  repeats 
;>  giver,  const  r.  t  lent!,  s  e  u  c  r.  c  e  of  syi :  b  o  1  s  o  n  ;■  f  r  c  q  i:  e  i.  t 

basis.  Another  type  of  source  coding  is  variable  length 
coding. 

In  variable  i£n£t.h  codes,  those  source  symbols  which 
occur  most  frequently  are  assigned  the  shortest  channel 
codewords . 

One  of  the  most  popular  variable  length  codes  in  use  was 
originally  proposed  by  Huffman  (Ref  16:31-34)  in  the  early 
fifties.  This  code  is  in  a  class  known  as  nnJ.fluj>J.X 
d.£fL°dab  1  e  (UD)  codes.  UD  codes  imply  that  the  codewords  , 
regardless  of  length,  are  unique  sequences.  Hence  decoding 
is  instantaneous  upon  codeword  reception!  i  . e,  the  decoding 
does  not  depend  upon  reception  of  the  next  codeword). 
McEliece  has  shown  (Ref  19:244-245)  that  the  Huffman  code  is 
0jg_t_imaJ_  in  the  class  of  UD  source  codes. 

Many  techniques  for  source  coding  are  available. 
Chapter  2  of  this  thesis  discusses  some  approaches  used  in 
''compressing''  electrocardiogram  waveforms. 

The  otuput  of  the  source  coder  is  generally  a  sequence 
of  discrete  symbols  (i.e.  binary  1 | 0 )  suitable  for  futher 
processing  by  the  channel  coder. 

C  h  jt  n  n^:  _l  Encoder;.  Shannon  proved  that  if  the  rate  of  the 
source,  as  seen  by  the  channel,  is  less  than  the  channel 
capacity  C,  then  ''noiseless''  or  error  free  transmission  is 
theoretically  possible.  Th  e  goal  of  channel  encoder  is  to 
combat  channel  noise  to  achieve  a  probability  of  error  (Re) 
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which  approaches  zero. 

Ch  r,  n  n  e  1  encoders  allow  a  reduction  of  P  e  by  selectively 
reinserting  redundancy  which  has  been  removed  by  the  source 
coder.  This  redundancy  allows  error  detection,  and  with  the 
proper  codes,  error  correction  by  the  decoder.  How  close 
the  Pe  approaches  zero  is  purely  a  function  of  the  effort 
(and  money!)  spent  on  channel  coding. 

A  common  channel  coding  technique  is  the  use  of 
''parity''  bits  in  digital  communication.  With  parity 
checking,  a  bit  (or  bits)  is  added  to  the  source  word  which 
represents  the  number  (odd  or  even)  of  ''ones''  in  the 
word.  For  example,  if  odd  parity  is  defined  and  the  source 
word  is  1100101  then  a  single  parity  bit  of  0  implies  an 
even  number  of  ones  (1100101  I  0 )  . 

Parity  checking  in  the  example  above  will  dj;jt£c^  a 
bit  error  in  transmission.  A  more  powerful  technique 
is  Hamming  codes. 

The  Hamming  code  is  in  a  large  class  of  codes  known  as 
linear  codes.  Hamming  not  only  detects  errors  in 
transmission,  but  will  c.orr;^<:jt  errors  to  a  certain  level. 
This  correction  is  accomplished  by  multiplying  the  received 
codeword  by  a  matrix  known  as  the  s.yjl.d.r.om.e .  In  the  case  of 
Hamming  codes,  the  output  from  this  transformation  is  the 
bit  position  in  error. 

D  e^jc  o  d  e^  r 

As  would  be  expected,  the  decoder  is  the  inverse 
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operation  which  outputs  an  estimate  of  the  data  input  to  the 
encoder.  The  decoder  is  e  i  r  pi  ■  e  d  cl"  lie  e  ..  :•  :i  ne  I  lU-nuhr  ;•  ; .  d 

the  source  decoder.  The  channel  decoder  uses  the  redundancy 
added  by  the  channel  encoder  to  perform  error  checking 
and/or  correctio  .  The  source  decoder  takes  the  ''correct'' 
data  output  from  the  channel  decoder  and  ''decompresses'' 
the  data  to  produce  an  estimate  of  the  information  source. 
Information  theory  has  shown  that  if  enough  time, 
complexity,  and  money  is  spent  on  channel  encoding,  and  the 
information  rate  is  below  the  channel  capacity,  then  ''error 
free''  transmission  is  possible. 

£.2 1!  .£  .1 H  .£  i  .2  H 

This  appendix  has  been  a  very  brief  summary  of  a  very 
large  field  of  study.  The  key  words  underlined  throughout 
this  text  are  terminology  which  appear  in  the  theory 
chapters  (2  and  3)  of  the  thesis.  For  a  more  thorough, 
mathematical  treatment  of  the  fields  of  Information  Theory 
and  Coding,  the  reader  is  encouraged  to  refer  to  the 
textbooks  by  McEliece  (Ref  19)  and  Berger  (Ref  4).  The  I  HER 
Press  and  Benchmark  book  (Ref  10)  is  an  execcllent  source 
for  a  survey  of  the  key  papers  in  the  field  of  Data 
Compr  e  s  s i on . 
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Appendix  c 


This  appendix  contains  the  6800  assembly  language 
source  programs  or  the  EKG-DAAS . 
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::;g-ixec-8 


C0030 

00040 

r;.or-o 

C'00.,o 

00070 

00080 

00090 

00100 

00110 

00120 

00130 

00140 

00150 

00160 

00170 

00180 

00190 

00200 

00210 

00220 

00230 

00240 

00250 

00260 

00270 

00280 

00290 

00300 

00310 

00320 

00330 

00340 

00350 

00360 

00370 

00380 

00390 

00400 

00410 

00420 

00430 

00440 

00450 

00460 

00470 

00480 


★  • 

* 

*  P!  YXIPA*  \  * '  -V  *! ' :  F  •  'C- F>’ ;  C 

*  author  :  cap:'.  :tl 

*  VERSiai  :  1.8 

*  VERSION  DATE  2  OCT  80 

* 

* 

*  PROGRAM  DESCRIPTION 

* 

*  THIS  PROGRAM  IS  IT TE  EXECUTIVE  ROUTINE  WHICH 

*  CONTROLS  TOE  EXORCISES  EKG  DATA  ACQUISITION 

*  SYSTEM .  THIS  ROUTINE  CAINS  OVHRLAYED  PROGRAMS 

*  WHICH  PERFORM  DATA  COLLECTION , COMPRESSION , STORAG 

*  AND  RECONSTRUCTION. 

*  THIS  SOFT, ’ARE  IS  IN  SUPPORT  OF  THFSIS  RESEARCH 

*  TO  IDENTIFY  INF  MOST  EFFICIENT  EKG  DATA  COMPRESS 

*  ION  ALGORITHM  IN  TOE  TEST  SET. 

* 

*  COMMAND  OPTIONS 

★ 

*  0=STORAG£  WITHOUT  COMPRESSION  (10  BIT) 

•k 

*  l=€OMMPRESS  WITH  ALGOR  TOLAN-A 

* 

*  2=COMPRESS  WITH  ALGOR  TOLAN-B 

* 

*  3=COMPRESS  WITH  AIjGOR  DOWER 

* 

*  4=COMPRESS  WITH  ALGOR  2ND  ORDER  INTERPOL 

* 

*  5=COMPRESS  WITH  ALGOR  TURNFT 

* 

*  6=DISPLAY  COLLECTED  DATA  &  STATS 

* 

*  7=JUMP  PROGRAM  CONTROL  TO  DOS 

k 

*  8=JUMP  PROGRAM  CONTROL  TO  EXBUG 

* 

*  9=LOAD  £,  EXECUTE  OTHER  OVERLAYS 

k 

*  S=SAVE  CUR  MEM  FILE  TO  DISK 

* 

*  START  OF  PROGRAM 

* 


00490  1D00 
00500 

k 

ORG 

$1D00 

PROGRAM  START  IOCATKN 

00510 

OFT 

O 

AS  SB  OFT  TO  CREATE  OM  RILE 

00520 

00530 

k 

OFT 

NOG 

AS SB  OFT  TO  SUP  ICC  Li  ST 

00540 
00550 
00  560 


*  LADLE  DECLARATIONS 

* 
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00570 

00  CO 


00570 

nnc;  qc\ 

*  SUPPCi:?  Si: 

* 

AT.- DP  I  .SS" 

\.'S  <  :  ’ 

ri ,r  ■'  ■  1  ;  ■ 

'  .  .  . 

0061C 

GY36 

KEYFDO  EQU 

SCA36 

EOS.  KEYED  INPUT  ROUTINE 

00620 

FOOO 

EXBUG  EQU 

$F000 

EXBUG.  EXBUG  ENTRY  FT 

00630 

2800 

DOS  EQU 

$2800 

DOS.  DOS  ENTRY  IT 

00640 

C75B 

WRITEO  EOU 

$C75B 

EOS.  CLR  PASS .’ED  BITTER 

00650 

CC87 

CLRPAS  EQU 

$CC87 

EOS.  CLR  PASS,. 3RD  BUFFER 

00660 

C7C8 

DRIVE  EOU 

$C7C3 

EOSIO.  DSK  DRIVE  SELECT 

00670 

C803 

RLIB  EOU 

$C803 

EOSIO. 

00680 

C807 

WLIB  dqu 

$C807 

EOSIO. 

00690 

CE52 

LOAD 2  EOU 

$CE52 

EOS.  IOAD  PRGM  ROUTINE 

00700 

CBDA 

DOSTR2  EQU 

$CBDA 

FAS.  ALT  EOS  ENTRY  LOC 

00710 

E055 

BYTE  EOU 

$E055 

MIKBUG.  GET  TO  HEX  DIG  FRM  TE 

00720 

* 

00730 

*  DATA  BUFFERS 

00740 

* 

00750 

3066 

NAME  EOU 

83066 

NAME  BUFFR  EOF.  FILE  I/O 

00760 

3060 

TEMPX1  EOU 

$3060 

TEMP  2  BYTE  STOP.  BUFFR 

00770 

3062 

TEMPX2  EQU 

$3062 

TEMP  2  BYTE  STOP.  BUFFR 

00780 

3058 

STARTX  EQU 

$3058 

LOWEST  ADDR  USED  IN  PRGM 

00790 

305A 

ENDX  EQU 

$305A 

HIGHEST  ADDR  USED  II1  PRGM 

00  800 

305C 

GOX  EOU 

S305C 

S'iYYRT  EXECUTE  ADDR 

00810 

001B 

PROGX  EQU 

$001B 

DISK  I/O  ERR  VEC  ADDR 

00820 

0008 

BMEMH  EOU 

$0008 

00830 

3002 

ENDBUF  ECU 

$3002 

DUE  WITH  ADDB  OF  IAC.T  CAR  IN 

00840 

3400 

HDRSTR  EQU 

$3400 

START  OF  I  LEM  FILE  HDR  SECTOR 

00850 

3004 

BUFFER  EOU 

$3004 

KEYED  INPUT  BUFFER  START 

00  860 

3057 

TYPE  EQU 

$3057 

TYPE  OF  FILE  FOR  I/O 

0  0  870 

1C96 

STKSAV  EOU 

S1C96 

TEMP  STACK  CAVE  PUFFER 

00880 

1C98 

CPRTYP  FOU 

S1C98 

COMPRESSION  TYPE  BUFFER 

00890 

1C9A 

COUNT  EOU 

$1C9A 

GENERAL  8  FIT  COUNFER 

00900 

1C9B 

HAMPTR  M\l 

$1C9B 

NAME  POINTER  FOR  CONSOLE  1/0 

00910 

1C9D 

VECSAV  EOU 

$1C9D 

IRO  VEC  SAW,  BUFFER 

00920 

1C9F 

OLAYGO  EQU 

$1C9F 

OVEPJAY  EXECUTE  FLAG 

00930 

ICAO 

DQOFIjG  FOU 

$1CA0 

PRSTAT  LOAD  VS  EXECUTE  FI  XI 

00940 

1CA1 

FILHLC  EOU 

$1G\1 

FILUDR  SUB  ADDR  PASS  PDF 

00950 

1CA3 

SAVELC  EOU 

$1CA3 

SAVEFT,  Sl’B  ADDR  PASS  BIT 

00960 

1CA5 

HXAGLC  EOU 

$1055 

NXAKC  SUB  /DDR  PASS  PUP 

00970 

1CA7 

HXBUF  EQU 

$1CA7 

HXASC  PARAMATER  PUFFER 

00980 

1CA9 

PDFPLC  EOU 

$1CA9 

PDFPRT  SUB  ADDR  PASS  PUP 

00990 

1G5B 

OVRLLC  EOU 

$1CAB 

OVRI.AY  SUB  ADDR  PASS  PIT 

01000 

1CAI) 

OVRBUF  EOU 

$1CAD 

OVRLA.Y'  PARV’ATI  ’R  PASS  '’INFER 

01010 

3490 

LOCPCT  EOU 

$3490 

TCTL  CAL  IOOPS  ENUC  IN  NAT? 

01020 

3494 

sam  Rio  non 

$3494 

MUM  OF  SAMPLES  TAF'M 

01030 

3496 

I.PCAL  EOU 

$3496 

MUM  OF  CAL  IjCCPS  IP"  1  IN  MI 

01040 

3497 

MAXZ  EQU 

$34  97 

MAX  VLU  IM  G I  Z 

01050 

3498 

MAXZIO  EOU 

$3498 

LOC  OF  TAX  All  IN  Gi  A, 

01060 

349A 

MIMZ  EOU 

$349A 

MIN  VLU  IN  CH  Z 

01070 

349B 

MINZiiO  FOU 

$34  9B 

IOC  OF  MIN  VLU  IN  CH  A 

01080 

349D 

MANY  IXQU 

$34  9D 

f AX  VLU  IN  CH  Y 

01090 

349E 

MAXYI/)  EOU 

$34  9E 

IOC  OF  TAX  YOU  IN  C  Y 

01100 

3450 

MINY  EQU 

$34A0 

MIN  VLU  IN  CH  Y 
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CKO: 

■X  *  C\ 

-\-o 

OHIO 

34 

!A1 

mi:  dig 

i  i-yvj 

S3  4A1 

i qc  of  min  vr,u  ch  y 

03120 

34A3 

MAXX 

FOU 

S34A3 

MAX  VI  .U  IX  CH  X 

01130 

3-’ 

:a4 

MAMXLQ 

I  OR 

S34A4 

ioc  c  nan  yt."  r  r:  :: 

m-o 

34 

A6 

:\rr. 

1  i  -F 

834. '.6 

mix  V:A  r:  c:i 

01150 

34A7 

MINXLO 

EQU 

$34A7 

IOC  OF  MIT  I  VLU  IM  CH  X 

01160 

34A9 

MEMBIT 

E3QU 

S34A9 

MUM  OF  BITS  AVAIL  FOR  STO 

01170 

34AC 

dtarit 

EOU 

S34AC 

MUM  OF  BITS  USED  20  STO  DTA 

01180 

34B0 

XB1TS 

EOU 

$3  4  BO 

MUM  OF  BITS  USED  TO  STO  X 

01190 

34B3 

YBITS 

EQU 

$34B3 

NUM  Op  BI'FS  USED  'TO  STO  Y 

01200 

34B6 

ZBITS 

EQU 

$34B6 

MUM  OF  BITS  USED  TO  S'lO  Z 

01210 

34B9 

TBITS 

EOU 

$34B9 

NUM  OF  BITS  USED  TO  STO  TINT 

01220 

34BC 

ACELCT 

EQU 

$34BC 

#  BITS  FED  TO  VAR  LEM  CODER 

01220 

34C2 

BASSAV 

EQU 

$34C2 

SAVE  LOC  FOR  VI. U  $3620  FRA 

01240 

3460 

MAXMIN 

EQU 

$3460 

START  OF  MAX, MIN  ASCII  BUFFI 

01250 

34C3 

EMTRPY 

EQU 

$34C3 

.START  OF  ENTROPY  TABLE  IM  Ar 

01260 

3COO 

SEFZRO 

EQU 

S3C00 

SEC  0  OF  MEM  FILE 

01270 

0019 

SAVEX 

EQU 

$0019 

TEMP  LOC  TO  SAVE  IF.DEX  REG 

01280 

3500 

XPDF 

EQU 

$3500 

IOC  OF  X  PDF  BUFFER 

01290 

3700 

YPDF 

EQU 

$3700 

LOC  OF  Y  PDF  PIJFFFR 

01300 

3900 

ZPDF 

BQU 

$3500 

LOC  OF  Z  PDF  BUFFER 

01310 

3  BOO 

TPDF 

EQU 

S3B00 

IOC  OF  TIME  PDF  BUFFER 

01320 

80  00 

BUFEND 

EQU 

$8000 

END  OF  MEM  BUF 

01330 

* 

01340 

*  HARDWARE  ADDRESSES 

01350 

* 

01360 

E500 

DACZRO 

EQU 

$E500 

DAC  0  ADDRESS 

01370 

E502 

daccme 

EQU 

SE502 

D  :THIS  ROUTINE  IS  THE  EXCCU 

01460 

*  CONTROLLER 

OF  TOE  EKG  DATA  ACQ  SYS 

01470 

* 

01480 

* 

01490 

1D00 

OF 

START 

SEI 

STOP  POSSIBLE  IMTT.  CM  RESET 

01500 

1D01 

CE 

4000 

LDX 

#$4000 

01510 

1D04 

FF 

E500 

STX 

DACZRO 

CLR  DACS  S,  SET  SEL  1  HIGH 

01520 

1D07 

FF 

E502 

STX 

DACO'JE 

01530 

1D0A 

CE 

21 4A 

LDX 

SFILHDR 

01540 

1D0D 

FF 

1CA1 

STX 

FILHLC 

KJT  FILIDR  ADDR  IN  PARS  BUFF 

01550 

ID]  0 

B6 

3620 

LDA  A 

$3620 

01560 

1D13 

B7 

34C2 

STA  A 

BASSAV 

SAVE  CURRENT  #$3620  IN  BUF  F( 

01570 

1D16 

CE 

20  8E 

LDX 

#SAVFFL 

01580 

1D19 

FF 

1CA3 

STX 

SAVELC 

PUT  SAVTTL  AUDIT  IN  PARS  BUF 

01590 

1D1C 

CE 

23  DB 

LDX 

SHXASC 

01600 

1D1P 

FF 

1CA5 

STX 

HXASIiC 

PUT  HXASC  ADDR  IN  PARS  BUF 

01610 

1D22  CE 

22C2 

TUX 

IrPDFPRT 

01620 

3D25 

FF 

ICAO 

STX 

PDF PEC 

PUT  PDFPRT  AUER  IM  PARS  BUF 

01630 

1D2R 

CE 

2067 

IDX 

SOVRLAY 

01640 

1D2B 

FF 

1CAB 

STX 

OYFLIC 

PUT  OVPJAY  ADDR  IM  37  DDF 

01650 

1D?E 

CE 

1DOO 

LDX 

# START 

01660 

1D31 

FF 

2803 

STX 

DOS+1 

01670 

1D34 

7F 

1C9F 

CLR 

OLAYGO 

CLR  CVTPJAY  1X0  FI  AG 

01680 

1D37 

7F 

ICAO 

CLR 

[/30FTX3 

CLR  FRSTAT  LOAD  FIG 

01690 

1D3A 

4F 

CLR  A 

01700 

1D3B 

P.D 

C7C8 

JSR 

DRIVE 

INSURE  EXEC  TTI,T'  TO  t*YK  0 

01710 

1D3E 

BD 

ir:6F 

JSR 

CMDIN 

lW.PT  f,  GIT  IN  CM’?' 

01720 

1D41 

Cl 

30 

CMP  B 

«'0 

IS  CMMD  AKC1I  0? 
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C1730 

1043 

26 

09 

HIE 

EXCM1 

MO.  C!  IFOC  05*  T 

nn-^n 

1!M5 

CF 

1DC7 

LDX 

#NOCPR 

IjOAD  OVERLAY  M. 

-  -  -  - 

l  p 

V"..0 

r*** * * 

o. 

70. 

2CG7 

07"JAY 

i/ad  i.  lx: .a:. 

01770 

1P4E  Cl 

31 

EXCM1 

aiP 

B 

n 

01700 

1D50 

26 

09 

BEE 

EXCM2 

01790 

1D52 

CE 

1DCF 

LDX 

ifTOIAKl 

01800 

1D55 

FF 

1CAD 

stx 

OVRBUF 

01810 

1D58  7E 

2067 

JMP 

OVRIAY 

01820 

1D5B  Cl 

32 

EXCM2 

CMP 

B 

#’2 

01830 

1D5D 

26 

09 

HIE 

EXCM3 

01840 

1D5F 

CE 

1DD7 

LDX 

#TOLAN2 

01850 

1D62 

FF 

1CAD 

STX 

OVRBUF 

01860 

1D65 

7E 

2067 

JMP 

OVRLAY 

01870 

1D68  Cl 

33 

EXCM3 

aip  b 

#’3 

01880 

1D6A 

26 

09 

HIE 

EXCM4 

01890 

106C 

CE 

1CDF 

LDX 

#do,;fr 

01900 

106F 

FF 

ICAO 

STX 

OVRBUF 

01910 

1072 

7E 

2067 

JMP 

OVP1AY 

01920 

1D75 

Cl 

34 

EXCM4 

CMP 

B 

I! 1  4 

01930 

1077 

26 

09 

HIE 

EXCM5 

01940 

1079 

CE 

1DE6 

LDX 

* INTER 

01950 

1D7C 

FF 

1CAD 

STX 

OVRBUF 

01960 

1D7F 

7F 

2067 

JMP 

OVRJ  AY 

01970 

1DR2 

Cl 

35 

EXCM5 

CMP  B 

#’5 

01980 

1D84 

26 

09 

HIE 

EXCM6 

01990 

1D86 

CE 

IDEE 

LDX 

“TURXPT 

02000 

1089 

FF 

ICAO 

STX 

OVRPUF 

02010 

1D8C  7E 

2067 

JMP 

OVRIAY 

02020 

1D8F  Cl 

36 

EXCM6 

CLP 

B 

.  ’6 

02030 

1091 

26 

09 

HIE 

E>DM7 

02040 

1D93 

CE 

1DF6 

LDX 

ilDISPI 

02050 

1096 

FF 

1G\D 

STX 

OVRBUF 

02060 

1D99 

7E 

2067 

JMP 

OVRIDY 

02070 

109C 

Cl 

37 

EXCM7 

CMP 

B 

S’7 

02080 

1D9E 

26 

09 

HIE 

EXCM8 

02090 

10, 50 

CE 

2FCD 

LDX 

«$2RCD 

02100 

10A3 

FF 

2801 

STX 

DOS+1 

02110 

1DA6 

7E 

2800 

JMP 

DOS 

02120 

10A9 

Cl 

38 

FXCM8 

CLP 

B 

r  8 

02130 

1DAB 

26 

03 

p^ie 

EXCM9 

02140 

1PAO 

7F 

F000 

JMP 

FXBUO 

02150 

1OF.0 

Cl 

39 

EXCM9 

aip 

B 

* •  9 

02160 

1DP2 

26 

09 

PEE 

FXCMS 

02170 

1 0P4 

CE 

1  OFF, 

LDX 

fiO'/IESC 

02180 

1007 

ro 

CA87 

JSR 

aiTPUT 

021  90 

1DBA 

7E 

Q’OA 

JMP 

DOSTR2 

02200 

1000 

Cl 

r3 

fxcms 

a-ip 

B 

#’S 

02210 

10FF 

26 

03 

PEE 

exceed 

02220 

10C1 

no 

20  8F 

JSR 

SAVFi’L 

02230 

10C4 

7E 

1 D00 

exceed 

JMP 

START 

02240 

★ 

02250 

1DC7 

4F, 

NPCPR 

FCC 

/NOCPRS* 

/ 

02260 

10CF 

54 

TOIAM 

FCC 

/TOIAN-A*/ 

c: '  ds 
:t,  ptr 

0’.';  j-» 
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02'/  : 

j  i  )D7 

54 

TCI  A’ ;  2  FCC 

/TOLAN-B*/ 

02?  '0 

1  DDF 

44 

Da-JER  FCC 

/DCT  IER*  / 

r 

INTER  FCC 

/riTFEFLV 

. 

■'  *-t 

11.74 F'V  ICC 

At:e:v‘  / 

02310 

1DF6 

44 

DISPL  FCC 

/DISPLAY*/ 

02320 

1DFE 

1A 

CJVLMSG  FCB 

S1A 

02330 

1DFF 

45 

FCC 

/ENTER  "RUN  FILNAME"  TO 

LOAD  &  EXECUT 

02340 

1E25 

4F 

FCC 

/OVERLAY  "FILENAME"./ 

02350 

1E38 

ODOA 

FDB 

$0D0A 

02360 

1E3A 

28 

FCC 

/(WARNING:  OVERLAY  MUST 

FIT  BETWEEN  / 

02370 

1E5D 

30 

FCC 

/0100-.1400)/ 

02380 

1E67 

ODOA 

FDB 

$0D0A, $0D0A, $003F, $2004 

02390  * 

02400  *  END  EKG-EXEC 

02410  * 

02420  ‘FUNCTION  :CMDIN 

02430  *  IN  PUTS  (REG)  :  NONE 

02440  ‘OUTPUTS  (REG) :B 

02450  ‘CALLS  : OUTPUT, KEYP.DO 


02460 

‘DESTROYS  :ALL  REGS 

02470 

‘PURPOSE  :TO 

PRINT  PROMPT  MESSAGE  AI'JD  READ  COMMAND 

02480 

*  FROM  CONSOLE. 

02490 

* 

02500  1E6F  CE  1E7F 

CMDIN  LDX 

IfCMDMSG  LOAD  OUT  PTR 

02510  1E72  BD  CA8F 

JSR 

am  icr 

02520  1E75  BD  CA36 

JSR 

KEYBDO 

02530  1E7 8  FE  3002 

LDX 

ENDBUF  SET  PR.T  TO  LAST  CHAR  ENTERED 

02540  1E7B  09 

DEX 

02550  1E7C  E6  00 

LDA  B 

0,X 

02560  1E7E  39 

RTS 

02570 

* 

02580  1E7F  1A07 

CMDMSG  FDB 

$1A07 , $0D0A, SOAOA, $0A0A, $0A0A 

02590  1E89  45 

FCC 

/EKG  DATA  ACQUISITION  SYSTEM/ 

02600  1EA4  ODOA 

FDB 

$ODOA,$ODOA 

02610  1EA8  43 

FCC 

/COMMAND  OPTIONS:/ 

02620  1EB8  ODOA 

FDB 

$0D0A,$0D0A 

02630  1 EBC  44 

FCC 

/DATA  ACQUISITION/ 

02640  1ECC  ODOA 

FDB 

$0D0A,$0D0A 

02650  1ED0  20 

FCC 

/  0=STORAGE  WITH  NO  COMPRESSION/ 

02660  IEEE  ODOA 

FDB 

$0D0A 

02670  1EF0  20 

FCC 

/  1COMPRESSION  VIA  TOIAN  ALGORITHM  A 

026  80  1F14  ODOA 

FDB 

$0D0A 

02690  1F16  20 

FCC 

/  2=OOMPRESSION  VIA  TOT  AN  ALGORITHM  B 

02700  1F3A  ODOA 

FDB 

$0D0A 

02710  1F3C  20 

FCC 

/  3  =CO!  1  PRES S ION  VIA  DQTER  ALGORITHM/ 

02720  1F5E  ODOA 

FDB 

$0D0A 

02730  1F60  20 

FCC 

/  4=OOi  1FRESSIOM  VIA  2ND  ORDER  INTERPL 

02740  1F89  ODOA 

FDB 

$0D0A 

02750  1F8B  20 

FCC 

/  5  =COM PRF'S S ION  VIA  TURNING  POINT  MG 

02760  1FB1  ODOA 

FDB 

$0D0A,$CDCA 

02770  1 FB5  44 

FCC 

/DATA  DISPLAY/ 

02780  1FC1  ODOA 

FDB 

$0D0A,$0D0A 

02790  1FC5  20 

FCC 

/  6=PRIMT  DATA  STATISTICS  OR  / 

02800  1FE1  44 

FCC 

/DISPLAY  DATA/ 
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crrio 

02820 

QO  O')  p 

02850 
0  2  860 
02870 
02880 
02890 
02900 
02910 
02920 
02930 
02940 
02950 
02960 
02970 
02980 
02990 
03000 
03010 
03020 
03030 


03220 

03230 

03240 

03250 

03260 

03270 

03280 

03290 

03300 

03310 

03320 

03330 

03340 


FDB  $0D0A,?0DCA 

FCC  /PROGRAM  CONTROL/ 
pnn  $ CDOA , ? PDOA 

/  7=I’Lrn  :-,M  TO  nor/ 

FDB  $0D0A 

FCC  /  8=RETURK  TO  EXBUG/ 

FDB  $0D0A 

FCC  /  9=LOAD  &  EXECUTE  USER  ENTERED  OVERL 

FDB  $ODOA,$ODOA 

FCC  /ENTER  COMMAND  NOW=/ 

FCB  4 

•k 

*  END  ODIN 

★ 

* 

♦FUNCTION  :OVRLAY 
♦INPUTS  (REG)  :X 

♦outputs  (rec)  :ncne 

♦CALLS  jClTEAM, PUT VM,  OVERLAY  AT  0,X 

♦DESTROYS  :ALL  RIO  I  STEPS 

♦PURPOSE  :TO  TOAD  AND  T1!II1  EXECUTE  OVERLAYS 

*  ASSOCIATED  WITH  EEC- EXEC  & 

*  SPECIFIED  BY  THE  INPUT  COMMAND. 


CLR  NAME  BUFFER 

CLEAR  PASS. ’CRD  BUFFER 

FUT  DOS  FILENAME  BUF  IN  NAMPT 

POINT  X  TO  CT7RLAY  MATTE 
FUT  GVRIAY  NAME  IN  NAME 
DEFINE  FILE  TOPE 

LOAD  FILE  POINTED  TO  BY  STK 
SET  UP  COMPARE  FOR  OVRTOY  FCN 
IS  FLAG  TRUE? 

YES.  TREAT  OTRLAY  AS  SUBR 
NO.  TREAT  OVP LAY  AS  APS  JUMP 
JUMP  TO  OVERT  AY 


*  END  OVRLAY 

* 

* 

♦FUNCTION  : SAVEFL 
♦INPUTS  (PEG)  :NONE 
♦OUTPUT’S  (REG)  :NGNE 

♦CALLS  :CLRPA5 ,DRIVE,WLIB, NRITEU ,G JTPUT 
♦DESTROYS  :AEL  REGISTERS 

♦PURPOSE  :TO  SAVE  KKG  DATA  FILES  RESIDING  I! 
♦IN  MEMORY  LOCATIONS  3A00-7FIT  CM  RTFK.  :  1 : 

*  PICKED  OFF  OF  FILE  HEADER  AT  LOC  3AUE-JAi' 


03040 

★ 

03050 

★ 

03060 

•k 

03070 

2067 

BD 

20E1 

OVRLAY 

JSR 

CLRNAM 

03080 

2 06 A  BD  CC87 

JSR 

CLRPAS 

03090 

206D  CE 

3C66 

LDX 

TfNA'IE 

03100 

2070 

FF 

1C9B 

STX 

NAMFTR 

03110 

2073 

FE 

1CAD 

LDX 

OVRBUF 

03120 

2076 

BD 

20EF 

JSR 

PUTNAM 

03130 

2079 

86 

22 

LDA  A 

f,$22 

03140 

207  B 

B7 

3057 

STA  A 

TYPE 

03150 

207E 

BD  CE52 

JSR 

I  GAD  2 

03160 

2081 

86 

AA 

LDA  A 

#$AA 

03170 

2083 

B1 

1C9F 

CMP  A 

OLAY GO 

03180 

2086 

27 

05 

BBO 

OVRRTO 

03190 

2088 

8E 

A0  4  9 

LDS 

rr  $ A0  4  9 

03200 

208B  6E 

00 

JMF 

o,x 

03210 

208D 

39 

OVRRTS 

RTS 

'.Ml'  IS 


EKC-KX-8 


03330 

★ 

03360 

20P1  ‘  Pn  S]  SAV1TL  \\C'R 

'  wr.  3  ,  '■  'l-n  t  ■  v  • 

Cl  WAN 

Cjj>  w:\T\y 

03310 

•  *  .  i  *•.  i 

2093  617  41’ 

i-.'-  0 

....  .  ) 

a  j 

03390 

2095  06  3620 

IDA  A 

S3620 

GET  MTM  IOC  I  "OR  SAVE  FROf! 

03400 

2098  07  34C2 

STA  A 

OA SLAV 

SAW  IN  IV  ri-M-il 

03410 

2090  CE  2141 

IDX 

FNAMMSC 

SET  UP  FOR  TO  FRT  NAME 

03420 

209F  OF  1C90 

P'i’X 

NAMPBR 

03430 

20A1  CO  3402 

IDX 

i!HDRSTR+2  POINT  X  TO  FI I, RIM  TTJ  DAI 

03440 

20A4  8D  49 

BSR 

PUT ’AD 

PIT  FILE’.AM  IN  "NAME"  OFF 

03450 

20A6  86  2  2 

IDA  A 

“S22 

SET  TTPF  CF  FIEF 

03460 

20A8  07  3057 

STA  A 

TYPE 

03470 

20AR  CO  3400 

IDX 

#HDR£TR 

I/7AD  BUFFER  START 

03480 

20AF  FF  3058 

STX 

STARTO 

03490 

20B1  CE  7FFF 

LDX 

SBUFEND- 

1  LOYD  BUFFER  RID 

03500 

2004  FF  305A 

STX 

ENDX 

03510 

2007  CE  2800 

IDX 

SS2800 

LOAD  LGO  ADDRESS 

03520 

2 ORA  FF  305C 

r:x 

COX 

03530 

2 ODD  DF  IB 

six 

PR.OGX 

03540 

2 OOF  OD  CC87 

JSR 

clrpas 

CLR  PASSWRD  PUFFER 

03550 

20C2  CF  2119 

IDX 

SDRVMSG 

03560 

20C5  OD  GW 

JSR 

OUTMCR 

03570 

20C8  BD  E055 

JSR 

BYTE 

03580 

20CB  OD  C7C8 

JSR 

DRIVE 

SELECT  DRIVE  01  FOR  FT  ORE 

03590 

20CK  OD  C  807 

JSR 

WLIB 

03600 

20D1  DE  08 

LDX 

BilL’MIl 

03610 

20D3  OD  C750 

JSR 

WRITEO 

WRITE  BUFFER  TO  DISK 

03620 

20D6  4F 

CLR  A 

03630 

20D7  BD  C7C8 

JSR 

DRIVE 

RESET  DRIVE  PACK  TO  0 

03640 

20 DA  CE  2123 

LDX 

UCATMSG 

IDAD  OUTPUT  WINTER 

03650 

2 ODD  OD  0387 

JSR 

aiTPUT 

03660 

20 CO  39 

RTS 

03670 

* 

03680 

20E1  CE  3C66  CLRNAM 

L.DX 

WAME 

point  to  nail'-'  duffer 

03690 

20E4  C6  08  CLRNAO 

IDA  B 

*S8 

SET  'UP  CHAR  auvr 

03700 

20E6  86  20 

LDA  A 

?$20 

ASCII  SPACE 

03710 

20F8  A7  00  CLRMA1 

STA  A 

0,X 

FILL  NAME  BUF  WITH  SPACES 

03720 

20FA  00 

INX 

03730 

20EB  5 A 

DEC  B 

03740 

20FC  26  FA 

ONE 

clrnai 

03750 

20EF  39 

RTS 

03760 

★ 

03770 

20EF  EF  1C  96  i'UTOAM 

STS 

STKSAV 

SAVE  STACK  POINTER 

03780 

20F2  7F  1C9A 

cid 

COUNT 

0,1  FAR  On' ’MALM 

03790 

20F5  35 

I’XS 

TRANSFER  X  TO  ;  ":0 

03800 

20l'b  (.  E  306b 

I DX 

V’AME 

PICK  UP  n  U  MW  1  '  '• 

03810 

2 01 '9  C6  03 

IDA  B 

*8 

SET  UP  N/.MU  i  "MOM:  •  MM'!’ 

03820 

20FB  32  PUTNAl 

IUL  A 

ITT, I,  CAR  !  1  MT V'M 

03  830 

2010  81  04 

O’ IP  A 

IT04 

IS  IT  4? 

03840 

2 OFF  27  15 

BIX? 

nmiA2 

YES.  NAM1’  FWP 

03850 

2100  A7  00 

STA  A 

0,X 

NO.  STORE  CHA1  IN  "M 

03860 

2102  08 

IMX 

03  870 

2103  FF  306 n 

STX 

TFJII’XI 

SAVE  INDEX  M’V, 

03880 

2106  FF  1C 90 

IDX 

NAM  ITT 

LOAD  COPER  IT  ’  AM!  R 
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2109 

A7  00 

STA  A  0,X 

STORI  IN  NANEUS 

03°00 

21  OH 

08 

I  NX 

Dial  POINTER 

p  :  ' 

ElOO 

irT5 

*'AVT7rr> 

03 

211;' 

t 3060 

LLK  TL’l  TX1 

RESTORE  INDEX  REG 

03930 

2112 

5A 

DEC  B 

03940 

2113 

26  E6 

RNE  FU7NA1 

8  OIARS  YET? 

03950 

2115 

ro  1C96 

PUTNA2  LDS  STKSAV 

YES.  RESTORE  STACK 

03  960 

2118 

39 

RTS 

03970 

* 

03900 

2119 

ODOA 

DRVMSG  FDB  $0D0A 

03990 

211 B 

44 

FCC  /DRIVE? 

/ 

04000 

2122 

04 

FCB  4 

04010 

2123 

1A07 

CATTISG  FDB  S1A07  ,  $0D0A,  $0D0A 

04020 

2129 

44 

FCC  /DATA  SAVED  ON  DISK  FILE  / 

04030 

2141 

0008 

NANMSG  RMB  8 

04040 

214  9 

04 

FCB  4 

04050 

★ 

04060 

*  end  savefl 

04070 

★ 

04080 

* 

04090 

♦FUNCTION  tFILHDR 

04100 

♦INPUTS  (REG)  :NQNE 

04110 

♦OUTPUTS  (REG)  :NONE 

04120 

♦CALIiS  :  OUTPUT ,  KEY!  'D  0 

04130 

♦DESTROYS  : ALL  REGIST" 

RS 

04140 

♦PURPOSE  :TO  TEXT  DATA 

Bl  PEER  LTD!  ACCOUNT 

04150 

*  DATA  (NAT4E, DATE, TINT 

,  FTC)  AMD  CLEAR  FOR 

04160 

*  DATA  STORAGE. 

04170 

* 

041  80 

21 4A  BD 

21D7 

FI  LITE  JSR 

CLRBUF 

FILL  DATA  BUF  WITH  NUI.S 

04190 

21 4D 

BD 

21C9 

JSR 

CLRSEC 

PILL  NCI  FT1  SEC  3400  V.TTH 

04200 

2150 

BD 

2288 

JSR 

PDFCLR 

INITIALIZE  COLL  r.A’MN 

04210 

2153 

FE 

1C9  8 

LDX 

CPRTYP 

PICK  UP  CON PR  TOPE 

04220 

2156 

FF 

3400 

STX 

HDRSTR 

STR  IN  HEADER  SECTOR 

04230 

2159 

CD 

21 F5 

LDX 

SNAKE!  IS 

out  PER 

04240 

215C 

BD 

CA8F 

JSR 

arm; 

"NAu IE  FILE  PLEASE?" 

04250 

21 5F 

BD 

G\36 

JSR 

KEYF.D0 

0426  0 

2162 

C6 

02 

LDA  B 

i}$02 

HEADER  STOP  OFFSET 

04270 

2164 

ro 

42 

BSR 

TXTSTR 

STORE  FIINANE  ]!’  HEADER  SEC 

04280 

2166 

77 

PSil  B 

SAVE  NEXT  AVAIL  CAD  ICC 

04290 

2167 

CP 

2201 

UK 

*  SUIT  NS 

04300 

21 6  A 

P.D 

C/M.}’ 

JSR 

aiT’a-i 

"TEST  SUBJECT  ID?" 

04310 

21 6D 

PD 

G\  j  6 

JSR 

KEYBD0 

04320 

2170 

33 

PUL  R 

RETRIEVE  STOR  Ol  TO  0.7 

04330 

2171 

ro 

35 

BSR 

TXTSTR 

04340 

217  < 

37 

PS*  I  B 

04350 

2174 

a: 

221" 

UK 

4  RA  Til"S 

04360 

2177 

PD 

GAP’’ 

JSR 

aiTT.’CR 

"colu anon  paneling  •  at:?" 

04370 

21 7  A 

PD 

G',76 

JSR 

KHYP.DO 

043  80 

217D 

33 

PUT,  B 

043  90 

217  E 

ro 

28 

BSR 

TXTSTR 

04400 

21 8.0 

37 

PSff  B 

0441  0 

21  81 

a: 

2247 

IJK 

*  DATA’S 

04420 

2184 

PD 

GAFF 

JSR 

OUTL’CR 

"DATE  (05  JUI,  80)  V” 
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.187 

PD  CA36 

JSR 

KEYBDO 

044*10 

31  8A 

,  33 

PUL  B 

L*  • 

O  ID 

3  ; 

:  oR 
iV'ii  H 

rriy'-w'-^TT- 

04470 

21  BE 

CE  225E 

LDX 

#TIMFUS 

04480 

2191 

BD  CA8F 

JSR 

OUR  ICR 

"TIME  (1420)?" 

04490 

2194 

BD  CA36 

JSR 

KEYBDO 

04500 

2197 

33 

Pin,  b 

04510 

2198 

8D  0E 

BSR 

TXTSTR 

04520 

21 9A 

37 

PSH  B 

04530 

21 9B 

CE  2270 

LDX 

#CONrH.lS 

04540 

21 9E 

BD  CA8F 

JSR 

oomiai 

"CaiMENTG  (MAX  80)?" 

04550 

21 A1 

ED  CA36 

JSR 

KEYBDO 

04560 

21 A4 

33 

PUL  B 

04570 

21A5 

BD  01 

BSR 

TXTSTR 

04580 

04590 

21A7 

39 

★ 

RTS 

04600 

21A8 

BF  1C 96 

TXTSTR 

STS 

STKSAV 

SAVE  STACK 

04610 

21 AR 

8E  3003 

LDS 

#BUFEER- 

■1  POINT  TO  IN! XT  BUFFER 

04620 

21AE 

CE  3400 

LDX 

IHDRSTR 

POINT  TO  KK/DSR 

04630 

21B1 

4F 

CLR  A 

SET  A  TO  ZERO 

04640 

21 B2 

4C 

TXTST1 

INC  A 

04650 

21B3 

08 

INX 

04660 

21 B4 

11 

CBA 

IS  A  =  OFFSET? 

04670 

21B5 

2D  FB 

P.LT 

TXTST1 

NO.  KEEP  INCRNTINC 

04680 

21B7 

32 

TXTST2 

PUL  A 

YES.  GET  QIAR  FRCi!  STACK 

04690 

21 B8 

81  04 

CMP  A 

#$04 

IS  IT  4 

047  0  0 

21  BA  27  06 

BED 

TXTRTN 

YES .  RID  TEXT  , PETTY 

04710 

21RC 

A7  00 

STA  A 

0,X 

NO.  STORE  CHAR  IN  HEADER 

04720 

21  BE 

5C 

INC  B 

04730 

21 BF 

08 

INX 

04740 

21C0 

20  F5 

ERA 

TXTST2 

04750 

21C2 

A7  00 

TXTRTN 

STA  A 

0,X 

04760 

21C4 

5C 

INC  B 

04770 

21C5 

BE  1C96 

LDS 

STKSAV 

RESTORE  STACK 

047  80 

21C8 

39 

RTS 

04790 

21C9 

CE  3400 

CLRSEC 

LDX 

#HDRSTR 

POINT  TO  DATA  BUF  START 

0  4  800 

2  ICC 

86  20 

LBA  A 

#$20 

ASCII  SPACE 

04810 

21CE 

A7  00 

CLRSE1 

STA  A 

0,X 

STORE  SPACE 

04820 

21D0 

08 

INX 

04  830 

21D1 

8C  3500 

CPX 

#XPDF 

IS  SECTOR  SPACED? 

04840 

21D4 

26  F8 

K1E 

CLRSE1 

COUNT  >  ZRO? 

04850 

0  4  860 

21D6 

39 

★ 

RTS 

NO.  ITN 

04  870 

2107 

CE  3400 

CLRBUF 

LDX 

#HDRSTR 

PORT  TO  DATA  BUF 

04880 

2lrJA 

86  0  0 

IDA  A 

#00 

ASCII  NULL 

04890 

21DC  A7  00 

CLRBU1 

STA  A 

0rX 

STORE  NULL 

0  4  900 

2  IDE 

08 

INX 

04910 

2  IDF 

8C  8000 

CPX 

#BUFEND 

IS  INDEX  REG  AT  END? 

04920 

21E2 

26  E8 

HIE 

CLRBU1 

NO.  KEEP  GOING 

04930 

04940 

21 E4 

39 

★ 

RTS 

YES.  RETURN 

04950 

211.5 

0D0A 

MAD! '.MS 

FDB 

SODOA, $0D0A 

0  4  960 

21E9 

4E 

FCC 

/NAME  DATA  FIFE  PI  EASE?  / 
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04970  2200  04 

FCI3 

4 

f*  •  ^ pnoi  pnp/\ 

SVBJMS  pnp 

sohoa,  shdoa 

050vA)  221 E  04 

FCB 

-i 

05010  221F  ODOA 

RATIOS  FDR 

$0D0A, 6 ODOA 

05020  2223  43 

FCC 

/COLLECTION  SAMPLING  RATE  (500  HZ)?  / 

05030  2246  04 

FCB 

4 

05040  2247  ODOA 

DATUMS  FDD 

$0D0A,$0D0A 

05050  224B  44 

FCC 

/DATE  (05  JUL  80)?  / 

05060  225D  04 

FCB 

4 

05070  225E  ODOA 

TIMEMS  FDD 

$0D0A, 80D0A 

05080  2262  54 

FCC 

/TIME  (1423)?  / 

05090  226F  04 

FCB 

4 

05100  2270  ODOA 

crams  fdb 

$0D0A, 8 ODOA 

05110  2274  43 

FCC 

/COMMENTS  (MAX=80) ?  / 

05120  2287  04 

FCB 

4 

05130 

* 

05140 

*  END  FILHDR 

05150 

•k 

05160 

♦FUNCTION  : PDFCLR 

05170 

♦INPUTS  (REG) 

:NOME 

05180 

♦OUTPUTS  (REG) :NOHE 

05190 

♦CALLS  tNCmilNG 

05200 

♦DESTROYS  :A, 

P,X,CC 

05210 

♦PURPOSE  :TO 

INITIALIZE  STATISTIC  VAR  &  CLEAR 

05220 

♦  PDF  BUFFERS 

05230 

* 

05240  2288  4F 

PDFCLR  CLR  A 

FILL  PARAM  BUFr  WITH  0 

05250  2289  CE  3490 

LDX 

#LOOPCT 

05260  220C  A7  00 

PDFCLO  STA  A 

o,x 

05270  228E  08 

INX 

05280  228F  8C  34C3 

CPX 

“ENTRPY  FILL  WITH  0  UP  TO  C1TROPY  EUF 

05290  2292  26  F8 

ONE 

PDFCLO 

05300  2294  CE  021F 

LDX 

#$021F  STORE  MAX  POSSIBLE  BITS  IN  ME 

053  1  0  2297  86  FO 

LDA  A 

v$F0 

05320  2299  FF  34A9 

STX 

MEMBIT 

05330  229C  D7  34AB 

STA  A 

MEMBIT+2 

05340  229F  4F 

CLR  A 

05350  22A0  CE  3500 

LDX 

*XPDF  Na-J  CLR  PDF  BUF  AREA 

05360  22A3  A7  00 

PDFCLl  STA  A 

0,X 

05370  22A5  08 

INX 

053  80  22A6  8C  3C00 

CPX 

#SECZRO 

05390  22A9  26  F8 

BNE 

PDFCLl 

05400  2 2 AD  86  80 

IDA  A 

#$80  Na-J  SET  UP  INITIAL  MAX  6  MINS 

05410  22AD  C6  7F 

LDA  B 

#$7F 

05420  22AF  P,7  3497 

STA  A 

MAXZ 

05430  2.2.82  B7  349D 

STA  A 

MANY 

05440  22.135  137  34A3 

STA  A 

MANX 

05450  22138  F7  349A 

STA  B 

HINZ 

05460  22\T,  FI  34A0 

STA  B 

MITT/ 

05470  2213 E  F7  34A6 

STA  B 

MINX 

05480  220  39 

RTS 

05490 

★ 

05500 

*  END  JDFCLR 
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eorro 

2327  PE  19 

id:: 

.s.Y. . f"M  C  .!  TOT  A  -■ 

06060 

2329  A6  00 

LDA  A 

0,X  LDA  MSB  BYTE  OF  PDF  VLU 

('•'  i  ‘  1 

'■'2:'  TO  01 

i  ji  . 

1,::  LD  IF. '■ 

l.  R.  V 

1:3 2D  C  '  23CP 

I  1C 

06090 

2330  FF  1CA7 

STX 

HXBUF 

06100 

2333  PD  23 DB 

JSR 

HXASC  CONV  &  STO  MSB  IN  ASC  STR 

06110 

2336  17 

TBA 

06120 

2337  CE  23CF 

LDX 

#  PDF!  IS  5 +2 

06130 

23 3A  FF  1CA7 

STX 

HXBUF 

06140 

23 3D  BD  23 DB 

JSR 

HXASC  CONV  &  STORE  LSB  IN  ASC  STR 

06150 

2340  CE  23 BB 

LDX 

#PDFMS3 

06160 

2343  BD  CA87 

JSR 

OUTPUT  PRINT  STRING 

06170 

2346  32 

PUL  A 

RETRIEV  VLU  INDEX 

06180 

2347  DC  19 

LDX 

SAVEX  RETRIEC  CUR  PDF  ADDR 

06190 

2349  39 

RTS 

06200 

•k 

06210 

23 4A  1A0C 

PDFHSl 

FDB 

S1A0C , $0DCA, $0A0A, SO A0 A, $0A0A 

06220 

2354  3 A 

FCC 

/ :FILE  / 

06230 

235A  0008 

PDFNAM 

RMB 

8 

06240 

2362  0D0A 

FDB 

S0D0A, S0D0A 

06250 

2366  43 

FCC 

/a  ANNUL  / 

06260 

236E  0001 

PDFMS2 

RMB 

1 

06270 

236F  20 

FCC 

/  AMPLITUDE  distribution/ 

06280 

23  86  0D0A 

FDB 

$0D0A,$0D0A 

06290 

23  PA  44 

FCC 

/DATA  VALUE/ 

06300 

2394  20 

FCC 

/  NUMBER  OF  OCCUPFMCES/ 

06310 

23 B6  ODOA 

FDB 

S ODOA, $ ODOA 

06320 

23 FA  04 

FCB 

4 

06330 

23 SB  20 

PDFM.S3 

FCC 

/  / 

06340 

23 EF  0002 

FDFMS4 

RMB 

2 

06350 

23C1  2E 

FCC 

/ . / 

06360 

23CD  0004 

FDEMS5 

RMB 

4 

06370 

23D1  20 

FCC 

/  (HEX)/ 

06380 

23D7  04 

FCB 

4 

06390 

23D8  0D23 

PDFMS6 

FDB 

SOD  23 

06400 

23 DA  04 

FCB 

4 

06410  * 

06420  * 

06430  *  END  PDFPRT 

06440  * 

06450  *FUNCTION  :H 

06460  * INPUTS  (REG 

06  47  0  *ajTPUTS  ( REG 

06  4  80  *  CALLS  -.NOTE 

06490  *DESTEOYS  :A 

06500  * PURPOSE  :TO 

06510  *  INTO  2  BYT 

06520  * 

06530  * 

06540  23DB  FE  1CA7  HXASC  IDX 

06550  23DE  36  PSH  A 

06560  23DF  44  LSR  A 

06570  23 HO  44  LSR  A 

06  5  80  23 El  44  LSR  A 


*  END  PDFPRT 

* 

*  FUNCTION  :  HXASC 

*  INPUTS  (REG)  :  A ,  X ,  OTA  FOR  CONV,LOC  OF  ASC  SrPOR 
♦OUTPUTS  ( REG)  :  NONE 

*  CALLS  -.NOTHING 
♦DESTROYS  :A,CC 

♦PURPOSE  :TO  CONVERT  1  BYTE  OF  HEX  DATA 

*  INTO  2  BYTES  OF  ASCII 


HXBUF 


SAVE  OTA  ON  STX 
SHIFT  TOP  4  PIT’S 


TO  ! '  V 
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EKG-I'X-8 


G5510 

05520 

G  5  -  G 
05550 
05500 
05570 
05580 
05590 
05600 


* 

* 

♦inputs  (r-rc)  ::  toe 

*  OUTPUTS  (FIX')  tECLE 
♦GALLS  :  OUTPUT 
♦DESTROYS ( REG) : A , R , X , CC 

♦PURPOSE  5 TO  HUNT  AMPLITUDE  DISTRIBUTION 

*  DATA  COMPILED  DURIKG  DATA  COLLECTION. 

* 


05610 

22C2  CE 

23 5A  PDFPRT  IDX 

TODFNAM 

PUT  CUR  MEM  FILE  NAME  PC  MSG 

05620 

22C5  FF 

1C9R 

STX 

NAJ1PTR 

056  3  0 

22C8  CE 

3402 

LDX 

£HDRSTP.+2 

05640 

2203  RD 

2  0EF 

JSR 

putnam 

05650 

22CE  CE 

23  4 A 

LDX 

4PDFMS1 

IiOTiD  MSG  POINTER 

056  6  0 

22D1  85 

58 

IDA  A 

#'X 

05670 

22D3  D7 

23  6  E 

STA  A 

PDFUS2 

STOR  ASCII  X  TO  MSG 

05680 

22D6  PD 

CM  .7 

JSR 

OUTPUT 

"CNATNEL  X  AMPLITUDE 

05690 

22D9  CE 

3500 

LDX 

4XPDF 

POINT  TO  X  PDF  OTA 

05700 

22DC  85 

7F 

LDA  A 

#?7F 

IN  IT  COUNTER 

057  1  0 

22DE  8D 

25 

BSR 

PDFPR1 

PRINT  X  PDF  DATA 

05720 

22E0  CE 

23  4A 

LDX 

#PDFMS1 

STOR  ASCII  Y  TO  MSG 

05730 

22E3  86 

59 

LDA  A 

iv 1 V 

05740 

22E5  R7 

236E 

STA  A 

PDFMS2 

05750 

22E8  BD 

GA87 

JSR 

OUTPUT 

05760 

22ER  CE 

3700 

LDX 

4YPDF 

POINT  TO  Y  PDF  DTA 

05770 

22EE  86 

7F 

LDA  A 

~87F 

057  80 

22F0  8D 

13 

BSR 

PDFPR1 

05790 

22F2  CE 

23  4 A 

LDX 

nPDPMSl 

05800 

22F5  86 

5A 

LDA  A 

ii  <  n 

Lx 

05810 

22F7  B7 

236E 

STA  A 

PDFMS2 

05820 

22FA  RD 

CA87 

JSR 

OUTPUT 

0  5  830 

22FD  CE 

3900 

LDX 

4ZFDF 

05840 

2300  86 

7F 

LDA  A 

S$7F 

05850 

2302  BD 

01 

ESR 

PDFPR1 

05860 

2304  39 

RTS 

05870 

* 

05880 

2305  4C 

PDFPR1 

INC  A 

05890 

2306  81 

7F 

CMP  A 

rr$7F 

256  VINES  PR'JT’D  YET? 

05900 

2308  27 

07 

BEQ 

FDFPR2 

YES.  EXIT 

05910 

23 0A  RD 

23  IB 

JSR 

PRTVLU 

NO.  PRINT  VLUE  TO  CONSOLE 

05920 

23 0D  08 

TNX 

05930 

23 OF,  08 

TNX 

05940 

23  OF  20 

F4 

BRA 

PDFPR1 

PRINT  NEXT  VT.U 

05950 

2311  RD 

in  pppppp 

JSR 

mivi  .U 

0  5  960 

2314  CE 

23  D  8 

IDX 

IrPDF;  156 

05970 

2317  RD 

CASE 

JSR 

anircR 

05980 

23 1A  39 

RTS 

05990 

* 

06000 

23 ID  36 

< — * 

t 

K 

P. 

PSH  A 

SAVE  VALUE  INDEX  IN  ,  . 

06010 

23 1C  DF 

19 

STX 

SAVEX 

SAW.  IOC.  POT- NIT)  TO  TO  X 

06020 

23 IE  CE 

23  RF 

LDX 

*PDFMS4 

PICK  UP  STRING  TON 

06030 

2321  FF 

1CA.7 

STX 

HXBUF 

06040 

2324  RD 

23  DR 

JSR 

HXA.SC 

CONV  VLU  INDEX  TO  A’C'T  f,  STR 
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EKG-D 

;-8 

06  5  90 

23  E2 

44 

ISR  A 

06600 

23  F3 

8D 

08 

BSR 

HXTOAS 

COt TV  SORT'D  FITS  TO 

7E  3 

A7 

00 

cy 

o,x 

sot.  it:  ai.rh 

23  E7 

32 

PUL  A 

06630 

23  E  8 

8D 

03 

BSR 

HXTOAS 

CONV  mi  4  TO  ASC 

06640 

23  EA 

A7 

01 

STA  A 

i,x 

STR  IN  ALPH  STRING 

06650 

23EC 

39 

RTS 

06660 

* 

06670 

23  ED 

84 

OF 

HXTOAS 

;  and  a 

S$0F 

CLR  TOP  4  BITS 

06680 

23  EF 

81 

OA 

CMP  A 

S80A 

IS  NUN  GE  HEX  A? 

06690 

23F1 

2C 

03 

E-GE 

HXTOA1 

YES.  BRANCH  &  ADD  B] 

06700 

23F3 

CD 

30 

ADD  A 

5f  $30 

NO.  ADD  BIAS  OF30  & 

06710 

23F5 

39 

RTS 

06720 

23  F6 

8B 

37 

EKTOA1 

ADD  A 

«$37 

06730 

23F8 

39 

RTS 

06740 

★ 

06750 

*  END 

HXASC 

06  760 

* 

06770 

*  END 

OF  EKG- 

•EXEC  ROUTINES 

06780 

* 

06790 

END 

RET 
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00070 
00000 
00000 
00100 
00110 
00120 
00130 
00]  40 
0015C 
00160 
00170 
00180 
00190 
00200 
00210 
00220 
00230 
00240 
00250 
00260 
00270 
00280 
00290 
00300 
00310 
00320 
00330 
00340 
00350 
00360 
00370 
00380 
00390 
00400 
00410 
00420 
00430 
00440 
00450 
00460 
00470 
00480 
00490 
00500 


* 

■k 


.  .  t 


ovr  i ay  :yme  jiHrM."' 

*  :cam.  tm  ■ 

*  VERSION  : 1 . 5 

*  VERSION  DATE  :4  NOV  80 

* 

************************************ *********  ******* 
* 

* 

* 

* 


PROGRAM  DESCRIPTION 


THIS  PROGRAM  DISPLAYS  TEE  STATISTICAL  DATA 

*  CALCULATED  DURING  TEE  COLLECTION  OF  AN  EKG 

*  RECORDING.  TIE  USER  PAS  SEVERAL  NODES  OF  DATA 

*  OUTPUT  AND  THEY  ARE  LISTED  IN  THE  COM! 'AND  STRING 

*  BELOW.  TilIS  PROGRAM  .ALSO  PRODUCES  PROBABILITY 

*  DENSITY  FUNCTION  (PDF)  PLOTS  OE'  TEE  DATA  COLLECTED 

*  ON  CHANNEL  X,Y,OR  Z  VIA  D/A  CONVERTERS.  TIE  DATA 

*  (PDF)  IS  DIS HAYED  ON  AMD  OGCILLISCOPD . 

*  IN  ADDITION,  TIE  CONI  AND  STRE’G  ALLOWS  RECONSTRUCT 

*  AND  DISPLAY  OF  PREVIOUSLY  CCLIYCTED  DATA  ON  TIE 

*  OSCILLISCOPE .  THE  RECONSTRUCTION  RCUTINES  ARE 

*  OVERT AYED  OVER  TIE  PRINT  STATISTICS  ( PRSTAT) 

*  ROUTINES. 


* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

**************************************************** 
******************* *************************** ****** 
* 

*  START  OF  DIS PL 

* 

**************************************************** 

* 


COMMAND  OPTIONS 

0-  RETURN  TO  ERG-EXEC 
1=  PRINT  CURRENT  MEMORY  FILE  STATISTICS 
2=  PRINT  PDF  AMPLITUDE  TABLES 
3=  DISFLAY  XPDF  ON  TIE  OSCILLISCOPE 
4=  DISPLAY  YPDE  ON  TIE  OSCILLISCOPE 
5=  DISPLAY  ZFDF  ON  TIE  OSCILLISCOPE 
6=  REN CON STRUCT  &  DISMAY  CH  X  ON 
THE  OSCILLISCOPE 
7=  RECONSTRUCT  &  DISMAY  CH  Y  ON 
THE  OSCILLISCOPE 
8=  RECONSTRUCT  &  DISPLAY  CH  Z  ON 
THE  OSCILLISCOPE 
9=  LOAD  MEMORY  FILE  FROM  DISK 


00510  0100 
00520 

★ 

ORG 

$0100 

PROGRAM  ORIGIN 

00530 

OFT 

O 

AS  SB  OFT.  LIST  ASSYRIA’ 

00540 

OPT 

NOG 

AS SB  OPT.  SUPPRESS  FCC  LIST 

00550 

00560 


**************************************************** 
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I 

I 


DIHi  LA-5 

CC570 

k 

00580 

*  LABEL  DECSEI 

ft  ions 

00610 

* 

00620 

CA8F 

OUINCR  ECU 

SCARP 

EBRO 'DOS.  OUTPUT  STRING  NTF! 

00630 

CA36 

KEYBDO  DQU 

SCA36 

EPROFNOS.  I : ' Pi 'T  ai.pt:  string 

00640 

1D00 

START  EQU 

S1D00 

EKG-FX!  C.  START  A'CM  FS 

00650 

CCAO 

MAKNAA  EQU 

SCCA0 

EPROMDOS.  GET  FILE  XA T02  FROM 

00660 

C803 

RLIB  EOU 

$C803 

EPROM:  JOS.  SET  U?  READ  I/O 

00670 

2800 

DOS  EQU 

$2800 

DOS.  RESTART  KG 

006  80 

C43C 

READO  EQU 

$C43C 

EPROMDOS .  READ  DISK  ROUT  LET 

00690 

E055 

BYTE  EOU 

$E055 

MIKBl’G.  INPUT  2  BEX  DIG  FP".  '■ 

00700 

C7C8 

DRIVE  EOU 

SC7C8 

EPRGDOSIO.  READ  DISK  ROUTINE 

00710 

0500 

PRSTAT  EQU 

$0500 

PRINT  COLLEC  STAT  ROUTINE 

00720 

k 

00730 

*  DATA  BUFFERS 

00740 

* 

00741 

0020 

oinlbe  eou 

$0020 

CHANNEL  DLTSIO’TATOR  FOR  DECFRS 

00750 

3400 

HDRSTR  EQU 

$3400 

MEN  FILE  RiDR  ADDR 

00760 

3500 

XPDF  EOU 

$3500 

LOG  OF'  CP  X  PDF  BUFFER 

00770 

3700 

YPDF  EOU 

$3700 

LOG  OF  CH  Y  PDF  BUFFER 

00780 

3900 

ZFDF  FOU 

$3900 

LOC  OF  CH  Z  PDF  BUFFER 

00790 

FFF8 

IROVEC  IQU 

$FFF8 

LCC  OF  i:  IT  VECTOR  ADDRESS 

00800 

1C9D 

vtcsav  ecu 

$1C9D 

TEMP  IROVEC  SAVE  LCC 

00810 

3002 

EODBUF  EQU 

$3002 

PUP  LIT!!  ADDR  OF  LAST  CHAR  IN 

00820 

1C96 

STKRAV  ECU 

$1296 

TEMP  STACK  STORAGE  BITTER 

00  830 

0019 

FAVEX  EOU 

$0019 

TEMP  INDEX  REG  STORAGE  BUFFER 

00840 

OOOA 

EMEMH  DQU 

S000A 

END  -LEM  ADDR  FOR  DISK  I/C 

008,50 

001B 

PROGX  FOU 

$001B 

ERR  VFC  ADDR 

00860 

1C9F 

OLAYCO  DQ-U 

$1C9P 

OVRLAY  MODE  FLAG 

00870 

3057 

TYPE  EOU 

$305-7 

FILE  TAPE  PUi-FER 

00880 

1CA9 

PDFPLC  EQU 

$1CA9 

PDFPRT  ADDR  PASS  BUFFER 

00890 

1GYB 

OVRLLC  FOU 

S1GVR 

OVRLAY  ADDR  PASS  BUFFER 

00900 

1CAD 

OVRBUF  EQU 

51CAD 

OVRLAY  PARAMETER  BUFFER 

00910 

k 

00920 

*  HARDWARE  ADDRESSES 

00930 

k 

00940 

E500 

DACZRO  EOU 

SE5C0 

D/A  CONVERTER  ZERO 

00950 

E400 

ADCZRO  EQU 

$E400 

A/D  CONVERTER  ZERO 

00960 

* 

00  970 

* 

00980 

♦FUNCTION 

:DISPL 

00990 

♦INPUTS  (REG) 

:NCNF. 

01000 

♦OUTPUTS ( REG) 

:  EC!  ;P 

01010 

♦CALLS 

:(\;t:cr,k 

EYP-DO 

01020 

♦DESTROYS 

:Af B,CC,X 

01030 

♦PURPOSE 

:DISPL  IS 

THE  COMMAND  EXEC  !  .  "RON’!'! 

01040 

* 

command 

INPUT  FRO!  T-U  ri A.D  T 

01050 

★ 

DIRECTING  EXECUTION  OF  THE  F  O 

01060 

* 

IONS. 

01070 

★ 

01080 

* 

01090  0100 

CE  0100 

dispIj  i,dx 

#DISPL 
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DISPLA-5 


01100  0103  FF  2801 

STX 

DOS+l 

OH  ]0  0106  CE  025B 

t'"  n  *  'i  n r  r-  r 

LDX 

f-DISPMS 

II,-. . '  s  ,  ■  -  '  —  It 

01130  01LC  ED  G\36 

Joiv 

.  1 

*■  .  :  ■  .... 

(•  I..  .  .  L,  '  . 

01140  010F  FE  3002 

LDX 

ENDBUF 

SET  UP  IN  DATA  BUF  POINTIER 

01150  0112  09 

01160  0113  E6  00 

DEX 
LDA  B 

0,X 

GET  LAST  CRAR  INPUT  FROM  TERM 

01170  0115  Cl  30 

CMP  B 

#'0 

WAS  IT  0? 

01180  0117  26  03 

BME 

DISPL1 

NO.  QIEK  IF  1 

01190  0119  7E  1D00 

JMP 

START 

YES.  RET  TO  EKG-EXEC 

01200  011C  Cl  31 

DISPL1  G-1P  B 

#'l 

WAS  Ca-PVND  1? 

01210  011E  26  OC 

BNE 

DISPL2 

NO.  CHEKC  IF  2 

01220  0120  CE  01E4 

LDX 

fPRSNAM 

GET  "PRSTAT*"  TO  SEND  TO  OVRL 

01230  0123  FF  1G3D 

STX 

OVRBUF 

STORE  "PRSTAT"  TO  OVRLA.Y  BUFF 

U1240  0126  7F  1C9F 

CLR 

OLAYGO 

RESTE  OLAYGO  FLAG 

01250  0129  7E  04D6 

JMP 

OVRLAY 

01260  012C  Cl  32 

DISPL2  CMP  B 

# 1 2 

WAS  COMMAND  2? 

01270  01 2E  26  OF 

BNE 

DISPL3 

NO.  CIIEK  IF  3 

01280  0130  PD  04DB 

JSR 

PDFPRT 

PRINT  PDF  AMPLITUDE  TABLES 

01290  0133  CE  0463 

LDX 

#DISMS1 

01300  0136  PD  CA8F 

JSR 

outncr 

"PRESS  RETURN" 

01310  0139  BD  CA36 

JSR 

KEYBDO 

01320  013C  7E  0100 

JMP 

DISPL 

01330  013F  Cl  33 

DISPL3  CMP  B 

#  '3 

WAS  COMMAND  3? 

01340  0141  26  OF 

BNE 

DISPL4 

NO.  CHECK  4 

01350  0143  CE  3500 

LDX 

fXPDF 

GET  ADDRESS  OF  X  PDF  DATA 

01360  0146  BD  0470 

JSR 

MAXSCN 

SCAN  PDF  i:  FIND  SHIFT  NECESSA 

01370 

* 

TO  ALLOW  OUTPUT  OF  PDF  VIA  12 

01380  0149  BD  04A0 

JSR 

FDFTRN 

TRANSFER  X  PDF  TO  WORK  BUFFER 

01390  01 4C  BD  04BA 

JSR 

SCALE 

SCALE  WORK  BUFFER  BY  SHIFT  FR 

01400  014F  7E  01F4 

JMP 

PDFOUT 

NOW  DISPIAY  X  PDF  TO  OSCOPE. 

01410  0152  Cl  34 

DISPL4  CMP  B 

#'4 

WAS  COMMAND  4? 

01420  0154  26  OF 

BNE 

DISPL5 

NO.  CHECK  5 

01430  0156  CE  3700 

LDX 

#YPDF 

GET  ADDRESS  OF  Y  PDF  DATA 

01440  0159  BD  0470 

JSR 

MAXSCN 

01450  015C  BD  (MAO 

JSR 

PDFTRN 

01460  01 5F  BD  04BA 

JSR 

SCALE 

01470  0162  7E  01F4 

JMP 

PDFOUT 

01480  0165  Cl  35 

DISPL5  CMP  B 

V5 

WAS  COMMAND  5? 

01490  0167  26  OF 

BNE 

DISPL6 

NO.  RET  f,  PRINT  COMMAND  PRC1MP 

01500  0169  CE  3900 

LDX 

#ZPDF 

01510  016C  BD  0470 

JSR 

MAXSCN 

01520  016F  BD  04A0 

JSR 

PDFTRN 

01530  0172  PD  04 BA 

JSR 

SCALE 

01540  0175  7E  01F4 

JMP 

PDFOUT 

01550  0178  Cl  36  1 

DISPL6  CMP  B 

re 

01560  017A  26  OF 

BNE 

DISPL7 

01561  017C  7F  0020 

CLR 

CHNLBF 

SET  CHNL  DESIGNATOF  '~CR  (T,  X 

01570  017F  7F  1C9F 

CLR 

OLAYGO 

01580  0182  CE  01EC 

IiDX 

SDECPRS 

LOAD  ft  RUN  DECPP.S  PITT  INF 

01590  0185  FF  1CAD 

STX 

OVRBUF 

STORE  "DECFRS"  TO  OC  '!  A\  PUFF 

01600  0188  7E  04D6 

JMP 

OVRLAY 

01610  01  OB  C]  37  DISPL7  CUP  B 

#'7 

01620  OlfiD  26  10 

BNE 

DISPL 8 
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C1621 

01  P  E  86 

01 

IDA  A 

#] 

01622 

0191  97 

20 

STA  A 

CHNLBF 

f'  > 

ni  ro  *7 r* 

i  '-'op 

r*  t  > 

p»r  Tk\*r*r\ 

01650 

c-  *  . 

0199  FF 

1CAD 

STX 

OVREUF 

01660 

019C  IE 

04D6 

JMP 

OVRLAY 

01670 

01 9F  Cl 

38 

DISPL8  CMP  B 

#'8 

01680 

01A1  26 

10 

BNE 

DISPL9 

016  81 

01A3  86 

02 

LDA  A 

#2 

016  82 

01A5  97 

20 

STA  A 

CHNLBF 

01690 

01A7  7F 

1C9F 

CLR 

OLAYGO 

01700 

01AA  CE 

01EC 

LDX 

#DECPRS 

01710 

01AD  FF 

1CAD 

STX 

OVREUF 

01720 

01 DO  7E 

04D6 

JMP 

OVRLAY 

01730 

01B3  Cl 

39 

DISPL9  CMP  B 

#'9 

01740 

01D5  26 

2A 

BNE 

CMDERR 

01750 

01B7  86 

22 

LDA  A 

#$22 

01760 

01B9  B7 

3057 

STA  A 

TYPE 

01770 

01BC  CE 

02'C 

LDX 

#NAMMSG 

017  80 

01 BE  BD 

CAFF 

JSR 

OUTNCR 

01790 

01C2  BD 

CCAO 

JSR 

MAKNAA 

01800 

01C5  ED  C803 

JSR 

RLIB 

01810 

01C8  CE 

FFFF 

LDX 

#$FFFF 

01820 

01CB  DF 

OA 

STX 

EMEND 

01830 

01 CD  CE 

2800 

LDX 

#DOS 

01840 

01D0  DF 

IB 

STX 

PROGX 

01850 

01D2  CE 

3400 

LDX 

#IDRSTR 

01860 

01D5  ED  C43C 

JSR 

READ0 

01870 

01D8  CE. 

0456 

LDX 

#FILEMS 

01880 

01DB  BD 

CA8F 

JSR 

OUTNCR 

01890 

01DE  BD 

CA36 

JSR 

KEYBD0 

01900 

01910 

01E1  7E 

0100 

CMDERR  JMP 
* 

DISPL 

01920 

01E4  50 

PRSNAM  PCC 

/PRSTAT* 

01930 

01960 

01EC  44 

DECFRS  FCC 

★ 

/DECPRS* 

01970 

01F4  86 

AA 

PDFOUT  LDA  A 

#$AA 

01980 

01990 

01F6  B7 
01F9  OE 

0248 

STA  A 
PDFCXJl  CLI 

DONTST 

02000 

01 FA  7F 

024B 

CLR 

fount 

02010 

01FD  FE 

FFr8 

LDX 

IRQVLC 

02020 

0200  FF 

1C9D 

STX 

VECSAV 

02030 

0203  CE 

0240 

LDX 

i-STOP 

02040 

0206  FF 

FFr8 

STX 

IROVCC 

02050 

0209  CE 

07  FF 

LDX 

#$07FF 

02060 

020C  FF 

E500 

STX 

DACZI.O 

02070 

020F  CE 

3200 

IDX 

#$3200 

02080 

0212  7C 

024B 

PDFCU2  INC 

FOUNT 

02090 

0215  27 

ON 

BEQ 

FDFOU3 

02100 

0217  A6 

00 

IDA  A 

0fX 

02110 

0219  F6 

01 

IDA  B 

1  ,x 

02]  20 

021B  B7 

E500 

STA  A 

DACZRO 

021  30 
02140 

021 E  F7 
0221  08 

E501 

STA  B 
HOC 

DACZRO+1 

set  a  ex  dnfto ntor  fto  ch  v 


SET  CHNL  DESIGNATOR  TOR  G!  Z 


SET  INTERRUPT  DONE  TEST  El  AG 

CLEAR  INTERRUPT  EASE  FOR  STOP 

CLR  PUFFER  PP.T  OP ‘’ITER 

GET  G1R  TOO  VECTOR 

SAW  IN  TIE  IP  BUFFER 

LOAD  ADDRESS  CE  STOBTOG  INTO 

SEND  MAX  PCS  FJSLE  FOR  SCOPE 


GET  START  ADDR  OF  V ' 

pump  up  iTO  cofuinn 
has  whole  nuFrn;  r . 
NO.  GET  MSB  BYTE  CE 
GET  LSB 

SU’D  TO  D/A  CO?  A/ 
SEND  1X3  D/A  CONV 
INC  INDEXED  ADDIN'S 


"  B  Ti'HR 


,\.r  n 
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02800 

♦FUNCTION 
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02810 

♦INPUTS  (REG) 

:X 

02820 

♦OUTPUTS 

: SHIFT  REQUIRED  IN  SHFCNT 

0  2  830 

♦CALLS 

: NOTHING 

02840 

♦DESTROYS 
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02850 
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0  2  860 
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TO  BY  X  AND  RETURNS  THE  MINIMUM 
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★ 

FOR  OUTPUT  FROM  THE  ST6800  D/A  COMVE 
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★ 
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02930 
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09 

DEX 
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02940 
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09 
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7F  0249 
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7F  024A 
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047D 

27  IE 
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MAXSC4 
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08 

INX 
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08 

INX 

03010 
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A6  00 
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03030 

0485 

2D  F3 

BI,T 

MAXSC1 

YES.  NO  SHUT  KECESS,  GO  CHEC 

03040 

0487 

5F 

CLR  B 

NO.  SET  UP  COUNTER 

03050 

0488 

OC 
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INSURE  CARRY  CLEAR 

03060 

0489 

5C 

M7\XSC2  INC  B 

NOW  SHIFT  UNTIL  MSB  1  BIT  HIT 

03070 

04  PA 

48 

ASL  A 

03080 

048B 

25  02 

BCS 

MAXSC3 

CARRY  SET? 

03090 

04CD 

20  FA 

BRA 

MAXSC2 

NO.  KEEP  SHIFTING  LEFT 

03100 

048F 

17 

MAXSC3  TBA 

YES.  PUT  SHUT  COUNT  IN  A 

03110 

0490 

86  06 

IjDA  A 

#6 

CET  MAX  SHIFT 

03120 

0492 

10 

SBA 

AND  GET  DIFFERING’' 

03130 

0493 

P.l  0249 

CMP  A 

SHFCNT 

IS  SHIFT  I,E  CUPRIN’’  TFT  COU 

03140 

0496 

2F  E2 

BLE 

KAXSC1 

YES.  IGNORE  THIS  VAR"-  CUFC 

03150 
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R7  0249 
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SHFCNT 

NO.  SAVE  THIS  SHI;  '  •  '  '  ’  ' 

03160 

04  9R 
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BRA 

MAXSC1 
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SAVEX 
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★ 
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★ 
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*FUNCTTON 
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03220 
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:X 
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03230  *OUTPUTS 

032^0  *CALLS 

C  3  ? '  0  *DFSTI\OYS 

03260  * PURPOSE 

03270  * 

03280  * 

03290  * 

03300  * 

03310  04 AO  DF  19  PDFTRN  ST: 
03320  04A2  BF  1C96  ST! 

03330  04A5  35  TX< 

03340  04A6  CE  3200  LD) 

03350  04A9  8C  3400  PDFTR1  CP) 
03360  04 AC  27  06  BE? 

03370  04AE  32  PUI 

033  00  0  4AF  A7  00  ST/ 

03390  04B1  08  IN) 

03400  04B2  20  F5  BPY 

03410  04B4  DE  19  PDFTR2  LP> 
03420  04B6  BE  1C96  IDE 

03430  04B9  39  RTS 

03440  * 

03  4  50  * 

03460  *FUNCTION 

03470  * IN PUTS 

03400  *OUTPUTS 

03490  *CALLS 

03500  *DESTROYS 
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03530  * 

03540  * 

03550  * 
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03570  * 
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•.DATA  PI  WORK  BUFFER 
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CJVRLLC 

03860 

03870 

04D9 

6E 

00 

* 

JMP 
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★ 
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★ 
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PROGRAM  DESCRIPTION 

00130 

★ 

00140 

★ 

THIS  ROUTINE,  WIEN  LOADED  AMD  EXECUTED,  TAKES 

00150 

* 

THE  STATUS  DATA  CURRENTLY  PRESENT  IN  THE 

00160 

•k 

MEMORY  FILE  .HEADER  SECTOR  AMD  PRINTS  THIS  DATA 

00170 

* 

TO  THE  CONSOLE.  THIS  ROUTINE  CAN  BE  CALLED 

00180 

★ 

IMMEDIATELY  FOLLOWING  A  DATA  COLLCCTICN  OR 

00190 
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ie 
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00350 

* 
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*  SUPPORT  SUBROUTINE 
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00400 
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EPRCHDOS.  ALPH  STRING 

TO  CONS 

00410 

CA36 

KEYPD0  EQU 

$CA36 

EPRCTTOS.  ALPH  STRING 

IN  FPJ* 

00420 

1D00 

START  ECU 
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EKG-EXEC.  SOFT  EGK-FXF 

C  START 

00430 
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DOS  EQU 
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FOR  JM 

00440 

* 

00450 

*  DATA  BUFFERS 

00460 

* 

00470 
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LC-OFLG  EQU 
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IOAD  VERSUS  EXECUTE  FE 

AG 

00480 

1CA5 

HXASLC  DQU 

S1CA5 

FX.ASC  AD  DR  PASS  BUFFER 

00490 

1CA7 

HXBUF  EOU 

S1CA7 

hxasc  tyrant: :r  buffe 

00500 

1C96 

STKSAV  EQU 

S1C9G 

TEMP  STACK  SAVE  PUFFER 

00510 

3400 

HDRSTR  EQU 

$3400 

MEM  FILE  HEATER  START 

00520 

3490 

LOOPCT  EQU 

S3  4  90 

7X711,  CAL  I/OBS  EXEC  IN 

WAIT 

00530 

3494 

SAMIMO  EOU 

S3  4  94 

NUM  OF  SAMPLES  TAKEN 

00540 

3496 

LiPCAL  EQU 

$34% 

MM  OF  CAL  LOOPS  E'ER  1 

INTO 

00550 

3497 

MAXZ  EQU 

$3497 

MAX  VLU  PI  CH  Z 

00560 

3498 

MAXZLO  EOU 

$3498 

LOCATION  OF  MAX  VLU  IN 
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349A 
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MINZIjO  equ 
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34A0 

MLNY  EQLJ 
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00620 

34A1 

MINYLO  EQU 

S34A1 

LOCATION  OF  MTN  VID  IN  CH  Y 

00630 

34A3 

MAXX  EQU 

$3  4  A3 

MAX  VLU  IN  CIl  X 

00640 

34A4 

IIAXXLO  EQU 

$34A4 

LOCATION  of  max  VLU  in  ch  X 

00650 

34A6 

MINX  EQU 

$34A6 

MIN  VUI  IN  CH  X 

00660 

34A7 

MINXIjO  EQU 

S34A7 

LOCATION  CF  MIN  VLU  IN  Cl!  X 

006  7  0 

34A9 

MEMBIT  BQU 

S34A9 

MUM  OF  BITS  AVAIIA'iLF  FOR  STO 

006  ao 

3  4  AC 

DTARIT  EQU 

$3  4  AC 

MUM  OF  BITS  USED  TO  S'  I  OR  IQ 'A 

00690 

34B0 

XBITS  EQU 

$3  4  B0 

HUM  OF  BITS  USED  TO  STOP  X  17j’ 

00700 

34B3 

YBITS  EQU 

$34B3 

MU  OF  BITS  USED  TO  ST  OR  Y  17” 

00710 

34B6 

ZBITS  EQU 

S34B6 

MUM  OF  BITS  USID  TO  ST  OR  X  DT 

00720 

34B9 

TBITS  EQU 

$34B9 

NUM  OF  BTTS  USID  T'O  STOR  TIME 

00730 

34BC 

ACELCT  EOU 

$34BC 

#  BITS  FED  TO  VAR  LIN  CODER 

00740 

34C2 

RASSAV  EQU 

S34C2 

SAID.  MEM  LOC  $3620  FROM  BASIC 

007  50 

34C3 

OTTRPY  FQ'J 

S34C3 

START  OF  ENTROPY  P.ITITR 

00760 

3460 

MAXMIN  EQU 
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00770 

★ 
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* 

00790 

♦FUNCTION  :PRSTAT 

0  0  800 

♦INPUTS  (REG) 

:NONE 

00810 

♦OUTPUTS  (REG) :NONE 

00820 

♦calls  :  amw,  i  tcasc 
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X 

00840 

♦PURPOSE  :  TO 

LIST  STAID  3  II’ FORMAT  ION  FROM  DATA 

00850 

♦  COLLECTION  . 

FILE  TO  T 

SEMINAL. 

00860 

★ 
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00880  0500 

86  0  8 

PR5TAT  LDA  A 

#8 

QR  MSG  FIELDS  IN  STAT  OUTPUT 

00890  0502 

CE  0A66 

LDX 

#NAME 

00900  0505 

I’D  0930 

JSR 

MSGCLR 

00910  0508 

86  3  5 

LDA  A 

#53 

00920  050A  CE  0A8C 

LDX 

#SUBJ 

00930  050D 

BD  0930 

JSR 

MSGCLR 

00940  0510 

86  OA 

IDA  A 

#10 

00950  0512 

CE  OADF 

LDX 

“RATE 

00960  0515 

PD  0930 

JSR 

MSGCLR 

00970  0518 

86  14 

LDA  A 

#20 

00980  051A  CE  0P07 

LDX 

“DATE 
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BD  0930 

JSR 

MSGCLR 

01000  0520 

86  0  8 

LDA  A 

#8 

01010  0522 

CE  0B39 

LDX 

#TIME 

01020  0525 

BD  0930 

JSR 

MSGCLR 

01030  0528 

D5  19 

IDA  A 

#25 

01040  052A 

CE  0B5F 

LDX 
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01050  052D 

BD  0930 

JSR 

MSGCLR 

01060  0530 

86  3  5 

IDA  A 
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JSR 
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#8 
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LDX 
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JSR 

01180  0590  85  08 
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LDA  A 

01310  0572  CE  0Dn9 

LDX 

01320  0575  PD  0930 

JSR 

01330  057  C  06  0  5 

LDA  A 

013  40  0  57 A  CE  Cl'CP 

IPX 

01350  057D  PD  0530 

JSR 

01360  0580  16  00 

LDA  A 

01370  030?  CK  Oi  EF 

LDX 

01380  0585  I'D  0930 

JSR 

01380  0588  86  08 

LDA  A 

01400  0 5f  A  CK  OniD 

LDX 

01410  05  ID  PD  0430 

JSR 

01420  0580  16  08 

LDA  A 

01430  0892  CK  01,93 

IPX 

01440  0595  PD  0930 

JSR 

01450  0598  86  08 

IDA  A 

01460  009A  CK  0561 

IPX 

01470  058D  PD  0930 

JSR 

01480  0  5A0  86  0  8 

IPA  A 

01490  05762  CK  01593 

IPX 

01500  C  5A5  PD  0930 

JSR 

01510  05A8  86  08 

I  DA  A 

01520  05/ A  CK  OF  C5 

IPX 

01530  0r'AD  PD  0530 

JSR 

0  1  5  4  0  0  5130  86  05 

I  PA  A 

01550  051'?  CK  0KK7 

IPX 

01560  05! '.5  PD  0r*  ',0 

JSR 

01570  05P8  n:  3 n 2 

IPX 

01580  05PP,  FF  0ri'p 

01590  05PK  CF  O.'Au 

IPX 

01600  05C1  I  D  09  K' 

JSR 

01610  05C-1  CK  PAD’ 

LDX 

01620  0r/’7  14)  0°  ‘C 

JSR. 

01630  ORA  n ••  O-'.tf 

1 ,1  'X 

01640  05(  D  ,  P  Or,;"‘ 

JSR 

KSGCI  ,R 


FiXA 

S8 

RZFJiT 

kscclr 

8 

Pi'FLT 

fkccip 

*8 

VrtlAXCPR 

FKGCLR 

n  8 

*c:racii 

MSGCLR 


FSGCLR 
*■  5 

pp 

msgclr 
rCC!  S.7: 

#8 

MSGCLR 

#8 

WAXX 

KSGCI.R 

*8 

?M*.T1!Y 

MSGCLR 

*8 

* ATAXY 
MSGCl  ,8 
£  8 

*afj.xy 

msgclr 

i;  ° 

±K'K\/- 
v.c'.fTI  ,p 
o 

** 

lm:i 

XSGCLF 

ii'p;  '/‘-Vp-I  2  L.  V.'  ! 'I T  IT: 'A  L.  I  ■!  '  !•' 
FKFI  8  <’ 
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t.  1 1 

,  EDO 

CE 

0F07 

LDX 

JDATE 

01660 

C5D3 

RD 

093C 

JSR 

P1SGPI  ’T 

c: 

P'  c: 

TEX 

i.mT' 

01690 

05DC 

CE 

OF  2  9 

LDX 

XOPiKT 

01700 

C5DF 

BD 

093C 

JSR 

MSG PUT 

01710 

05F.2 

PE 

34C3 

LDX 

ELTRPY 

GET  LOC  OF  LLTROPY  PUFFER 

01720 

05F5 

8C 

2020 

CPX 

#$2020 

0!K  if  eltropy  calc  rim? 

01730 

05E8 

27 

03 

BEQ 

PRSTOO 

*40.  cTORE  LOT  CALC  LSG 

01740 

05LA 

7E 

06  A  4 

JFP 

PRSTAO 

YES.  GET  ASCII  SIRE.'G  FROM  HD 

01750  05 ID  CE  09FD  PRST00  LDX  SEN7CLR 

01760  O5F0  FF  095D  STX  FRMLOC 

01770  05F3  CF  0P96  LDX  #XELT 

01780  05F6  RD  093C  JSR  MSGFUT 

01790  05F9  CE  09FD  LDX  #ENTCLR 

0  1  80  0  05PC  FF  095D  STX  FPDJ.OC 

01810  05FF  CE  0FC8  LDX  #YEET 

01820  0602  PD  093C  JSR  MSGFUT 

01  83  0  06  0  5  CE  09FD  IDX  #B;TCLR 

01840  0608  FF  095D  STX  FRMI7X' 

01850  06 OF  CE  G3FA  LDX  SZLLT 

01860  06 OF,  BD  093C  JSR  MSGPUT 

01070  0611  CE  C9FD  LDX  #EETCLR 

0  1  880  06  1  4  FF  095D  STX  FRMLOC 


01890 

0617  CE 

0C2C 

LDX 

r^'lXIT 

01900 

06 1A  RD 

093C 

JSR 

ESC PUT 

01910 

06 ID  CE 

09FD 

LDX 

SENTCLR 

01920 

0620  FF 

095D 

STX 

FRi  'LCC 

01930 

0523  CE 

OCCE 

LDX 

#MAXCI'R 

01940 

0626  FD 

093C 

JSR 

MSGFUT 

01950 

0529  CE 

09FD 

LDX 

#ENTCLR 

01960 

06 2C  FF 

095D 

STX 

FRE1XC 

01970 

06  2F  CF. 

0D11 

LDX 

#CPRACH 

01980 

0632  FD 

093C 

JSR 

MSGFUT 

01990 

0635  CF 

09FD 

LDX 

•FENTCLR 

02000 

0538  FF 

095D 

STX 

FRT’JjOC 

02010 

063R  CE 

on  57 

LDX 

#CPREFF 

02020 

06 3E  BD 

owe 

JSR 

MSGFUT 

02030 

0641  CE 

09FD 

LDX 

SF'iUL 

02040 

0644  FF 

095D 

STX 

FRJiLOC 

02050 

0647  CE 

QD99 

LDX 

#TILDEF 

02060 

05  4 A  P.  D 

093C 

JSR 

XSGPHT 

02070 

06 4 D  CF 

pQs-T> 

IDX 

#EiTJXT,R 

02080 

0650  FF 

095D 

STX 

F5C  ,T  PC 

02090 

0653  CE 

ODCB 

LDX 

::  cor, ix  Tn 

02100 

0656  FD 

093C 

JSR 

MSGPJT 

02110 

06  5  c>  CE 

09FD 

IDX 

>thtclr 

02120 

06 5C  FF 

C95D 

STX 

FFFT.CC 

02130 

06 SF  CE 

onm 

TDX 

#AMAXX 

02140 

0662  FD 

093C 

JSR 

LSGIVT 

02150 

0665  CF, 

09FD 

LDX 

4  I-UTCLR 

02160 

0668  FF 

09rD 

STX 

FRur/e 

02170 

06 6 P  CE 

0!  ::f 

LDX 

“ALTMX 

02180 

06  6  F  P,D 

093C 

JSR 

MSGn.iT 
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breual'-o 


021  90 

0671 

CE 

09  ED 

LDX 

IT  170  ,K 

p-^nr. 

06  7  A 

FF 

norr 

FR"I/X: 

L  ...-.lu 

Ui  ii\ 

ED 

'Y.bC 

02230 

0670 

CE 

0  9FD 

II)X 

"ENTClil 

02240 

ocoo 

FF 

095D 

STX 

FRMLOC 

02250 

06  83 

CE 

0E°3 

LDX 

#AMINY 

02260 

06  86 

BD 

093C 

JSR 

MSG PUT 

02270 

06  89 

Cl] 

091  D 

LDX 

nENTCLR 

02280 

06  0C 

FF 

095D 

STX 

FRT1LOC 

02290 

06  OF 

CE 

0EC5 

LDX 

*AKAXZ 

02300 

06  92 

BD 

093C 

JSR 

MSGPUT 

02310 

06  95 

CE 

09FD 

LDX 

#ENTCLR 

02320 

06  98 

FF 

095D 

STX 

FRMLOC 

02330 

06  9B 

CE 

0E1'7 

LDX 

#AMLNZ 

02340 

06  9E 

BD 

093C 

JSR 

MSG PUT 

02350 

067d 

7E 

07  OA 

JMP 

prstai 

02360  06  A4  CE  34C3  PRSTAO  LDX  #EJTRPY  GET  ADDRESS  OF  ENTRPY  BUFFER 


02370  06A7  FF  095D 

STX 

FRMIjGC 

023  80  06AA  CE  0B96 

LDX 

#XEMT 

NOW 

PRINT  APPROPRIATE  DAT  TO 

02390  06 AD  BD  093C 

JSR 

MSGPUT 

02400  06 BO  CE  0BC8 

LDX 

iiYENT 

02410  06B3  BD  093C 

JSR 

MSGPJT 

02420  06F6  CE  OFFA 

LDX 

#zfnt 

02430  06B9  BD  093C 

JSR 

MSGPUT 

02440  06 BC  CE  0C2C 

LDX 

#TEMT 

02450  06BF  BD  093C 

JSR 

KSGFUT 

02460  06C2  CE  OCCE 

LDX 

fMAXCPR 

02470  06C5  BD  093C 

JSR 

MSGPUT 

02480  06C8  CE  0D11 

LDX 

#CPRACH 

02490  06CB  BD  093C 

JSR 

MSGPJT 

02500  06CE  CE  0D57 

IDX 

vCPRETF 

02510  06D1  BD  093C 

JSR 

MSGPUT 

02520  06D4  CE  0D99 

LDX 

tTIMEFP 

02530  06D7  BD  093C 

JSR 

MSGPUT 

02540  06 DA  CE  ODCB 

LDX 

*COLDUR 

02550  06 CD  BD  093C 

JSR 

MSGPUT 

02560  06 EO  CE  3460 

LDX 

tt-IAXMIN 

NOW 

GET  ADDR  L1IERE  ASCII  MAX, 

02570  06 E3  FF  095D 

STX 

FRMLOC 

02580  06 F6  CE  ODFD 

LDX 

slAI’AXX 

02590  06 F, 9  BD  093C 

JSR 

MSGPUT 

02600  06 EC  CE  0E2F 

LDX 

IfAMINX 

02610  06 EF  BD  093C 

JSR 

MSGPJT 

02620  06 F 2  CE  0E61 

LDX 

WAXY 

02630  06 F 5  BD  09JC 

JSR 

MSGPUT 

02640  06 F 8  CE  0E93 

LDX 

v  AM  L7 47 

02650  06 FB  BD  093C 

JSR 

MSGPUT 

02660  06 ri;  CE  ore 5 

LDX 

W1AXZ 

02670  0701  BD  C93C 

JSR 

MSGPUT 

026  80  0704  CE  0F.F7 

TDX 

#AMINZ 

02690  0707  BD  093C 

JSR 

MSGPJT 

02700  07 OA  FE  3400  BB5TA1 

IDX 

HDRSTR 

:;a; 

DECODE  OOUITS  TV  EE  £  PUT 

02710  07 OD  BC  4C43 

CPX 

#$4E43 

(EC) 

MOCPRS? 

02720  0710  26  08 

PDF, 

PRSTA2 

MO 
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u  . . 

cr: 

con 

IPX 

COC TCP 

VFS . 

Pori'  >'  r; 

027  AO 

0715  FF 

09  3D 

STX 

FRM1DC 

/o 

nn,^ 

0277  U 

07  ID  26 

08 

lx  til 

PRSTA3 

r.u. 

027  89 

07 IF  CE 

09C2 

IPX 

tTOIA 

VFS. 

POINT  TO  TOLA: '-A  MSG 

027  PO 

0722  FF 

G95D 

STX 

FPNIOC 

02  COO 

07  25  20 

35 

RRA 

PRSTA7 

02810 

0727  8C 

5442  PR5TA3 

CPX 

4S5442 

(TB) 

TOLAN-B? 

C2820 

07  2A  26 

08 

EXE 

PRSTA4 

MO 

02830 

07 2C  CE 

09GA 

LDX 

#TOLB 

YES. 

POINT  TO  TOLAN-B  MSG 

02840 

07  2F  FF 

095D 

STX 

FRIILOC 

02850 

0732  20 

28 

BRA 

PRSTA7 

0  2  860 

0734  8 C 

444F  PRSTA4 

CPX 

PS444F 

(DO) 

DCUER? 

0  2  870 

0737  26 

08 

EKE 

PRSTA5 

MO 

02880 

0739  CE 

09D2 

LDX 

tDQvP 

YES. 

POINT  TO  DONER  MSG 

02890 

07 3C  FF 

G95D 

STX 

FRMLOC 

02900 

073F  20 

IB 

PRA 

PRSTA7 

02910 

07  41  8C 

5450  PRSTA5 

CPX 

4S5450 

(TP) 

TURNING  POINT? 

02920 

07  44  26 

08 

HIE 

FRSTA6 

NO. 

02930 

07  46  CE 

09D8 

LDX 

#TURNPT 

YES. 

POINT  TO  TURNING  POINT  M 

02940 

0749  FF 

095D 

STX 

FRNLOC 

02950 

37 4C  20 

0E 

BRA 

PRSTA7 

02960 

07 4E  8C 

494E  FP.STA6 

CPX 

#$494 E 

(IN) 

2ND  ORDER  INTERPOLATOR? 

0  2  970 

07  51  27 

03 

EEQ 

PP.ST61 

YES. 

TYPE  IS  RIICOGUIZED.  CCNT 

02980 

07  53  7E 

095F 

JMP 

ERROR 

NO.  TYPE  NOT  RECOGNIZED.  ERR 

02990 

0756  CE 

09E6  PP.ST61 

LDX 

4  I^'TFTR 

03000 

0759  FF 

095D 

STX 

FF31LOC 

03010 

07  5C  CE 

0E5F  PR.STA7 

IPX 

9TYPE 

rjt  ca;n:s  type  lm  msg 

03020 

07  5F 

BD 

093C 

J  SR 

NSGPUT 

03030 

0762 

CE 

0A12 

LDX 

*HDRMSG  m-1  PT  TO  STATNSG  PAGE  1 

03040 

0765 

PD 

CA8F 

JSR 

CUTNCR  AND  PRINT  PACE  1 

03050 

0768 

BD 

GA36 

JSR 

TIEY3D0 

03060 

07 6 D  CF 

0C6B 

LDX 

f HDPDS2  NON  PT  TO  STATNSG  PAGE  2 

03070 

07  6  E 

ID 

CALF 

JSR 

OUTUCR  AND  PRINT  PAGE  2 

03080 

0771 

PD 

GA36 

JSR 

KEYED0 

03090 

0774 

CE 

OFF  4 

IDX 

ttNUI ISMP+2  FIG<  UP  NUN  OF  SN.PLS, 

03100 

0777 

F6 

3495 

IDA  A 

SAMTOO+1  CONVAT  TO  ASCII,  &  STORE 

03110 

07  7 A 

PD 

0955 

JSR 

HXASC  TO  CUTOUT  STRING. 

03120 

07  7D 

CE 

OFF?. 

IDX 

4NUMSMP 

03130 

07  GO 

PC 

34  94 

IDA  A 

SANFNO 

03140 

07  83 

PD 

0955 

JSR 

ICASC 

03150 

07  (6 

CE 

1019 

LDX 

4NUIILPS  PICK  UP  VLU  OF  CAL  TST 

03160 

07  89 

B6 

3496 

IDA  A 

LPG3L  6  STORE  TO  CUT  TUT  STOICS 

03170 

07  TO 

I’D 

0955 

JSR 

HXASC 

03180 

07  8F 

CE 

1060 

IDX 

#TCTLLT+5  PICK  UP  TCTT.  LOOP  COUNT 

03190 

0792 

D6 

3493 

IDA  A 

IOOPCT+3  , CONVERT  TO  ASCII  f.  STORE 

03200 

0795 

PD 

0955 

JSR 

HXASC  TO  OUTPUT  SDR  DIG 

03210 

0798 

CE 

1C5E 

IDX 

ifT\71UTO-4 

03220 

07913 

P6 

3492 

IDA  A 

LOOPCT+2 

03230 

07  RE 

1 3D 

0955 

JSR 

HXASC 

03240 

07A1 

CF 

105C 

LDX 

DTOTLUP+2 

03250 

07A4 

Pj6 

3491 

LDA  A 

LOOPCT+1 

03260 

07A7 

PD 

0955 

JSR 

HXASC 
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03270  07 AA  CF,  ]  03 A  LDX  STOTLUP 

pr>  3.00  IDA  A  LOOPCT 

'  ;  Flv.'-C 

03.H.U  o/ m  cf  nc5  in;  owns  n  or.  ft  na\  m.v  cr  c x 

03310  07  B6  B6  3 4 A3  LDA  A  MAXX  CON  TO  ASCII  i,  STL  IK 

03320  C71-.9  I’D  0955  JSR  HXASC  TO  OUTPUT  STRIFG 

03330  07 PC  CF  ICED.  LDX  IiXKAXLO+2 

033^-0  07 IT  P.6  34A5  LDA  A  MAXXLCH1 

03350  07C2  PD  0955  JSR  HXASC 

03360  07 C 5  CF  ] ODP  LDX  SXNAXLO 

03370  07 CR  PC  34A4  LDA  A  NAXXLO 

033 CO  07 CB  LP  0955  JSR  HXASC 

03390  07 CF  CF  1CF2  LDX  #XMINNM  PICK  UP  MIN  VLU  ON  CH  X 

03400  07D1  PC  3 4 A. 6  LDA  A  MINX  CONV  TO  ASCII  &  STORE  IN 


03410 

07  D4 

BD 

1  0955 

JSR 

03420 

07  D7 

CF 

11  OF 

LDX 

03430 

07  DA 

R6 

34A8 

IDA  A 

03440 

07  CD 

BD 

0955 

JSR 

03450 

071.0 

CE 

110C 

LDX 

03460 

07  L3 

P6 

34A7 

IDA  A 

03470 

07  E6 

BD 

0955 

JSR 

03480 

07  E9 

CE 

111P 

LDX 

03490 

07  EC 

B6 

349D 

LDA  A 

03500 

07  FP 

BD 

0955 

JSR 

03510 

07  F  2 

cr 

113B 

LDX 

03520 

07  F  5 

PC 

349F 

LDA  A 

03530 

07F8 

BD 

0955 

JSR 

03540 

07  FR 

CF 

1139 

LDX 

03550 

07  FE 

B6 

3/0-0 

LDA  A 

03560 

0801 

BD 

0955 

JSR 

03570 

0804 

CE 

11 4C 

LDX 

03580 

0807 

PC 

34A0 

IDA  A 

03590 

080A  BD 

0955 

JSR 

03600 

080D  CE 

1168 

LDX 

03610 

0810 

PC 

34A2 

LDA  A 

03620 

0813 

ED 

0955 

JSR 

03630 

0816 

CE 

1166 

LDX 

03640 

0819 

DC 

34A1 

IDA  A 

03650 

081C 

BD 

0955 

JSR 

03660 

081F 

CE 

1179 

LDX 

03670 

0822 

B6 

3497 

LDA  A 

03680 

0825 

BD 

0955 

JSR 

03690 

0828 

CF 

1195 

LDX 

03700 

082B 

PC 

3499 

LDA  A 

03710 

082.E  BD 

0955 

JSR 

03720 

0831 

CE 

1193 

LDX 

03730 

0834 

BG 

3498 

LDA  A 

03740 

0837 

BD 

0935 

JSR 

03750 

083 A  CE 

11A6 

LDX 

03760 

083D 

B6 

3  4  9A 

LDA  A 

03770 

0840 

BD 

0°55 

JSR 

03780 

0843 

CE 

11C2 

LDX 

03790 

0846 

PC 

349C 

LDA  A 

03  000 

0849 

BD 

0955 

JSR 

HXASC  OUTPUT  STRING 
SXMINLO+2 

me-ixlch-i 

HXASC 

tfXMITJjO 

MINXLO 

HXASC 

t-YM.AXNM  PICK  UP  MAX  VLU  CN  CH  Y 

MAXY  CONV  TO  ASCII  C  STORE  IN 

HXASC  OUTPUT  STRING 

#YMAXLO+2 

MAXYLO+1 

HXASC 

tIYI’AXLO 

MAXYLO 

HXASC 

SYMINNH  PICK  UP  MIN  VLU  ON  CH  Y 

MEY  CONV  TO  ASCII  &  STORE  IN 

HXASC  OUTPUT  STRING 

#YMINLO+2 

ME1YLO+1 

HXASC 

IrYMEILO 

MINYLO 

HXASC 

#ZMiAXNM  PICK  UP  MAX  VLU  CN  CH  Z 

MiAXZ  CONV  TO  ASCII  &  STORE  El 

HXASC  OUTPUT  STRING 

#Z  MAX  1,0+ 2 

MAXZLO+1 

HXASC 

vZHAXLO 

MAXZLO 

HXASC 

HZMIMNH  PICK  UP  MIN  VLU  ON  CH  Z 
MINZ  CON/  TO  ASCII  $  STORE  IN 

HXASC  OU PUT  STRING 

#zmiiHjCh-2 
M  IN  Z 10+1 
HXASC 
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03  810 

0  R4C 

:  ce 

11C0 

I DX 

03  820 

084F 

r 

R6 

3  4  9B 
(  “  r) 

IDA  A 

t-i  C  ••C 

Cl  R 

CY 

i  a  0:3 

i  ,i.  .y 

03850 

0858 

B6 

3  4  A3 

LDA  A 

03  860 

085B 

BD 

0955 

JSR 

0  3  870 

085E 

CE 

120C 

LDX 

03880 

0861 

B6 

34AA 

LDA  A 

03890 

0864 

BD 

0955 

JSR 

03900 

0867 

CE 

120A 

LDX 

03910 

086 A 

B6 

34A9 

LDA  A 

03920 

086D 

BD 

0955 

JSR 

03930 

0870 

CE 

124B 

LDX 

03940 

0873 

B6 

34BF 

LDA  A 

03950 

0876 

BD 

0955 

JSR 

03  960 

0879 

CE 

1249 

LDX 

03  970 

087C 

B6 

3  4  BE 

LDA  A 

03980 

087F 

BD 

0955 

JSR 

03990 

0882 

CE 

1247 

LDX 

04000 

0885 

E6 

34ED 

LDA  A 

04010 

0888  BD 

0955 

JSR 

04020 

088B 

CE 

1245 

LDX 

04030 

088E 

B6 

34BC 

LDA  A 

04040 

0891 

BD 

0955 

JSR 

04050 

0894 

CE 

127F 

LDX 

04060 

0897 

P6 

34AF 

LDA  A 

04070 

089A 

BD 

0955 

JSR 

04080 

089D  CE 

]  27  D 

IDX 

04090 

O8A0 

P6 

34AE 

IDA  A 

04100 

08A3 

BD 

0955 

JSR 

04110 

08A6 

CF 

1 27  R 

LDX 

04120 

0  8A9 

B6 

34AD 

LDA  A 

04130 

08AC 

BD 

0955 

JSR 

04140 

08AF 

CE 

1279 

LDX 

04150 

08B2 

P6 

34AC 

LDA  A 

04160 

08B5 

PD 

0955 

JSR 

04170 

08B8 

CE 

1  2B7 

LDX 

04180 

0CBB 

B6 

3432 

LDA  A 

04190 

08BE 

I3D 

0955 

JSR 

04200 

08C1 

CE 

1235 

LDX 

04210 

08C4 

P6 

34B1 

LDA  A 

04220 

08C7 

BD 

0955 

JSR 

04230 

08CA 

CE 

12B3 

IDX 

04240 

0PCD 

B6 

3  4  B0 

IDA  A 

04250 

08D0 

ED 

0955 

JSR 

04260 

08D3 

CE 

12EF 

LDX 

04270 

08D6 

B6 

34B5 

LDA  A 

04280 

obd9 

ED 

0955 

JSR 

04290 

08DC 

CE 

12ED 

LDX 

04300 

08DF 

B6 

34R4 

LDA  A 

04310 

08F.2 

PD 

0955 

JSR 

04320 

0  8F,5 

CF, 

12113 

IDX 

04330 

08E8 

R6 

34P3 

LDA  A 

04340 

08113 

BD 

0955 

JSR 

MINZIjO 


MEniUT+2  AVATIAPLE  FOR  DATA  S'JOR 

HXASC  ,  COTV  TO  ASCII  {.■  STOR 

"AVAI'IT+2  IK  OUTPUT  STRING 

MEMB1T+1 

HXASC 

rf  AVAR  IT 

NEMRIT 

HXASC 

#TCPBIT+6 

ACELOP+3 

HXASC 

nTCPBlT+4 

ACELCT+2 

HXASC 

#TCPI3IT+2 

ACELCT+1 

HXASC 

#TCPDIT 

ACELCT 

HXASC 

#TOTHT+6  PICK  UP  HUM  OF  BITS 

DTABIT+3  ACTVALL  STORID 

HXASC  BECAUSE  C?  DATA 

#T0TBJT+4  CCT.PRESSICT,  CCTV  TO 

CTA3IT+2  ASCII  &  STORE  IK 

HXASC  OUTPUT  STRING 

-‘TOTS  IT  '2 

OT/T3IT+1 

HXASC 

IrTOTBIT 

DT/T.IT 

HXASC 

«xbit:m+4  pick  up  num  of  bits 

XBITS+2  ACTUALLY  STOR'D  FOR 

HXASC  DATA  IN  CHATTEL  X, 

-XBITMH2  COMV  TO  ASCII  L 

XBITS+1  STORE  TO  OUTPUT  STRING 

HXASC 

i'XBITKM 

XBITS 

HXASC 

#ybit:;h4  pick  up  nuu  of  bits 

YBITS+2  ACTUALLY  ST 'HID  FOR 
HXASC  DATA  VA  CHATTEL  1  , 

#yriti;m+2  gonv  to  ax: n  «, 

YBITS+l  STOP.!:  IN  OU7TUT  STTT.'R 

HXASC 

f-YPTTTM 

YBITS 

HXASC 
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n!  SI '  T-9 


04350 

0CEE 

CE 

1327 

LDX 

#ZBITNM 

+4  PICT  UP  NUM  Cl"  BITS 

04360 

08F1 

B6 

34B8 

LDA  A 

ZBITS+2 

ACTU/vLLY  STGRID  FOR 

TOM?,;: 

or:  t 

CD 

0955 

u : : : 

A  MAC 

DATA  IN  ON.  '  , 

CTO' 

CM- 7 

c.: 

1325 

ld:-: 

? zbit ::h-2  c .uv  to  ascii 

04390 

08FA  B6 

34B7 

LDA  A 

ZBITS+l 

STORE  IN  OUTPUT  STRING 

04400 

08FD 

BD 

0955 

JSR 

HXASC 

04410 

0900 

CE 

1323 

LDX 

#ZBITNM 

04420 

0903 

B6 

34E6 

LDA  A 

ZBITS 

04430 

0906 

BD 

0955 

JSR 

HXASC 

04440 

0909 

CE 

136D 

LDX 

#TBITNM+4  Pia<  UP  NUM  OF  BITS 

04450 

090C 

B6 

34EB 

IDA  A 

TBITS+2 

ACTUALLY  STORED  FOR 

04460 

090F 

BD 

0955 

JSR 

HXASC 

TIME  (OR  OTHER  PARA’ IE  TT 

04470 

0912 

CE 

136B 

LDX 

#TBITNM+2  OONV  TO  ASCII  & 

04480 

0915 

B6 

34BA 

LDA  A 

TBITS+1 

STORE  IN  OUTPUT  STRING 

04490 

0918 

BD 

0955 

JSR 

HXASC 

04500 

091B  CE 

1369 

LDX 

rTBITTIM 

04510 

091E 

B6 

34B9 

LDA  A 

TBITS 

04520 

0921 

BD 

0955 

JSR 

HXASC 

04530 

0924 

CE 

OF  8  9 

LDX 

#COSTAT 

GET  OUTPUT  STRING  ADDR 

04540 

0927 

BD  CASE 

JSR 

CUTNCR 

&  SEND  TO  CONSOLE 

04550 

092A  BD 

CA36 

JSR 

KEYED 0 

WAIT  FOR  TERM  INPUT 

04560 

092D 

7E 

2800 

JMP 

DOS 

JUMP  BACK  TO  GALLING  RC 

04570 

* 

04580 

*FUNC: 

MSGCLR 

04590  * IN PUTS :  1 

04600  ‘OUTPUTS: 

04610  ‘CALLS:  NC 

04620  *DESTROYS : 

04630  ‘PURPOSE: 

04640  ‘  PRSTAT  ] 

04650  * 

04660  0930  4C  MSGCLR  INC 

04670  0931  C6  20  LDA 

04680  0933  4A  MSGCL1  DEC 

04690  0934  27  05  EEC 

04700  0936  L7  00  STA 

04710  093  6  08  HIX 

04720  0939  20  F8  BRA 

04730  093B  39  MSGCL2  ICS 

04740  * 

04750  *  END  OF  M 

04760  * 

q  47  70  ********** 

047  80  * 

04790  *FUNC:  MSG 

04800  ‘INPUTS:  X 

04810  ‘OUTPUTS: 

04820  ‘CASTS:  NO 

04830  *DES TROYS: 

04840  ‘PURPOSE: 

04850  *  FROM  MEM 

04860  * 

04870  093C  BF  1C96  MSGPUT  STS 

0  4  8  80  0  93F  BE  095D  I  US 


‘INPUTS:  A  (#  OF  SPACES  TO  CLR) ,X  (LOC  TO  PUT  SPACES 
‘OUTPUTS:  ASCII  $20  TO  MEM  AT  X 
‘CALLS:  NOTHING 
*DESTROYS :  A,B,CC 

‘PURPOSE:  THIS  ROUTINE  CLRS  THE  MSG  BUFFER  EA.CH  TIME 

*  PRSTAT  IS  CALLED  FOR  NEW  INFO  OFF  OF  THE  MEM  DATA 

* 


MSGCLR 

INC  A 

INC  COUNTER 

LDA  B 

#$20 

ASCII  SPACE 

MSGCL1 

DEC  A 
BEQ 

MSGCL2 

IS  BUFFER  CLRED? 

STA  B 
HJX 

0,X 

NO.  KEEP  LOOPING 

BRA 

MSGCLl 

MSGCL2 

RTS 

*  END  OF  MSGCLR 

* 

’k'k’k'kirk’kiz’k'kic’k'kic  i: 

* 

*FUNC:  MSG PUT 

‘INPUTS:  X  (ADDR  LUCRE  DATA  IN  FRMIjOC  GOING) 
‘OUTPUTS :  ASCII  DATA  TO  ADDR  IN  X 
‘CALIS:  NOTHING 
*DES TROYS:  A,X,CC 

‘PURPOSE:  THIS  ROUTINES  TRANSFER  ASCII  TINT 

*  FROM  MEM  FILE  HDR  TO  STAT  MSG  BUFFER 

* 

MSGPUT  STS  STKSAV  SAVE  CURITN  STOCK  TV: 

IUS  FRMIjOC  GFT  LOC  OF  DATA  FU"  ' 
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-9 


04  i 
04900 

r.  c 

u-‘:  .  ■■ 

04930 

04940 

04950 

04960 

04970 

04980 

04990 

05000 

05010 

05020 

05030 

05040 

05050 

05060 

05070 

05080 

05090 

05100 

05110 

05120 

05130 

05140 

05150 

05160 

05170 

05180 

05190 

05200 

05210 

05220 

05230 


0942 

0943 


04 
0  :> 

00 


34 
32 
■:  Q 
.  o  27 

0948  A7 
094A  08 
094R  20  F6 
094D  31 
094E  BP  095D 
0951  BE  1C96 
0954  39 


MSGPU1 


MSGPU2 


DES 
PUL  A 
CMP  A 
L  -.  Q 

STA  A 

INX 

BRA 

INS 

STS 

LDS 

RTS 


v4 

MSCPU2 

0,X 

MSGPU1 

FRMLOC 

STKSAV 


h’p  op  ''pc’5 


NO.  PUT  QLAR  IN  MSG 


UPDATE  STK  WITH  NEXT  TRTNFR  L 
STR  BACK  IN  FRMLOC 
PICK  UP  ENTRY  STACK  PTR 


0955  FF  1CA7 
0958  FE  1CA5 
095B  6E  00 


* 

*  END  MSGRJT 

* 

***********  * 

* 

*FUNC:  HXASC 

*INPU1S:A,X  (DATA  TO  BE  CO' 7/'  D,  AD  DR  TO  STORE  ASCII  O 
*CALLS:  HSASC  ROUTINE  IN  EKG-EXEC 
*DISTROYS:  A,X,CC 

*  PURPOSE:  THIS  IS  A  RELOC  PASS  ROUTINE  TO  PICK  UP 

*  ADDRO  OF  HXASC  IN  EKG-EXEC  AND  JUMP  TO  IT 

* 

HXASC  STX  HXBUF  SAW  X  IN  PARAMATER  BUFFER 

LDX  HXASLC  CI.'T  ADDR  OF  CONV  ROUTINE  IN  E 
JMP  0,X  JUMP  TO  IT 


*  END  OF  HXASC 

* 

************** 

* 

095D  0002  FRMLOC  RMB  : 

* 

095F  CE  096B  ERROR  LDX 


DATA  FROM  LOC  FOR  MSGFJT 


0962  BD  CA8F 
05240  0965  BD  CA36 
05250  0%  8  7E  1D00 
05260 

05270  096B  0707 

05280  096F  4D 

05290  090C  4E 

05300  09A8  04 

05310 

05320 

05330 

053  4  0 

05350 

05360 

05370 

053  80 

05390 

05400 

05410 

05420  09A9  4E 


JSR 

JSR 

JMP 


SERRHSG 

OUTNCR 

KEYF-D0 

START 


$0707  ,$0D0A 

/MEMORY  FILE  COMPRESSION  TYPE  / 
/NOT’  RECOGNIZED.  PRESS  RETURN/ 

4 


ERRMSG  FDD 
FCC 
FCC 
FCB 

* 

************************************************** 

*  END  PRSTAT 

★★★★A********************************************* 

* 

************************************************** 

* 

*  OUTPUT  STRING  TO  LIST  TO  CONSOLE 

* 

************************************************** 

* 

NOCOMP  FCC  /NO  COMPRESSION  PFF'J’OR’TED/ 
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05430  09C1  04 

FCB 

4 

05^0  09C2  54 

TOLA 

FCC 

/TOLAM-A/ 

O'.'"'  0fC9  04 

PCD 

4 

05460  09CA  54 

TOLB 

FCC 

/TOLAN-B/ 

05470  09D1  04 

FCB 

4 

05480  09D2  44 

DOWR 

FCC 

/DO.-JER/ 

05490  09D7  04 

FCB 

4 

05500  09D8  54 

TORN FT  FCC 

/TURN TOG  POINT/ 

05510  09E5  04 

FCB 

4 

05520  09E6  32 

INTER 

FCC 

/ZND  ORDER  TOTERPOIATOV 

05530  09FC  04 

FCB 

4 

05540  09FD  43 

ENTCLR  FCC 

/CALCULATION  NOT  MADE/ 

05550  0A11  04 

FCB 

4 

05560  0A12  1A07 

HDRMSG  FDB 

?1A07 , SOCOD, SOAOA, $0ACA, PC 

:A0A,?0A0A 

0  557  0  0A1F,  3 A 

FCC 

/:EKG  SAMPLE  COLLECTION  TO 

WIST]  CS/' 

05580  0A3F  20 

FCC 

/  :  PAGE  1/ 

05590  0A48  ODOA 

FDB 

$ODOA,$ODOA 

05600  0A4C  46 

FCC 

/FILENAME . 

/ 

05610  0A66  0008 

NAME 

RM3 

8 

05620  0A6E  ODOA 

FDB 

$CD0A,$0D0A 

05630  0A72  53 

FCC 

/SUBJECT  . 

/ 

05640  0A8C  0035 

SUBJ 

RME 

53 

05650  0AC1  ODOA 

FDB 

$0D0A, $0D0A 

05660  0AC5  53 

FCC 

/SAMPLING  RATE  . 

/ 

05670  OADF  OOOA 

RATE 

RMB 

10 

05680  0AE9  ODOA 

FDB 

?0D0A,?0D0A 

056  90  OAED  44 

FCC 

/DATE  OF  COLLECTION.  .  .  . 

/ 

05700  0B07  0014 

DATE 

RMB 

20 

05710  0D1B  ODOA 

FDB 

$0D0Af$0D0A 

05720  0B1F  54 

FCC 

/TIME  OF  COLLECTION.  .  .  . 

/ 

05730  0B39  0008 

TIME 

RMB 

8 

05740  0B41  ODOA 

FDB 

$0D0A,?0D0A 

05750  0B45  43 

FCC 

/COMPRESSION  USED . 

/ 

05760  0B5F  0019 

TYPE 

RMB 

25 

05770  0B7 8  ODOA 

FDB 

$ ODOA,? ODOA 

057  80  0B7C  43 

FCC 

/CHANNEL  X  ENTROPY  .... 

/ 

05790  0B96  0008 

XENT 

RM R 

8 

05800  0R9E  20 

ix:  c 

/  BITS  / 

05810  OBAA  ODOA 

FDB 

?ODOA, ?0D0A 

05820  OPAE  43 

FCC 

/CHANNEL  Y  ENTROPY  .... 

/ 

05830  0BC8  0008 

YENT 

RMB 

8 

05840  OBD0  20 

FCC 

/  BITS  / 

05850  OBDC  ODOA 

FDB 

$ODOA,$ODOA 

05860  OBHO  43 

FCC 

/□lANNKL  Z  ENTROPY  .... 

/ 

05870  OBFA  0008 

ZK'IT 

RMB 

8 

05880  0C02  20 

FCC 

/  BITS  / 

05890  OCOE  ODOA 

FDB 

$0D0A,$0n0A 

05900  0C12  54 

FCC 

/TOTAL  SOURCE  INi'P'TO'Y.  ,  . 

/ 

05910  0C2C  0008 

TINT 

RMB 

8 

05920  0C34  20 

FCC 

/  BITS  / 

05930  CC40  ODOA 

FDB 

?UD0A, ?0DCA 

05940  0C44  50 

FCC 

/PRESS  RITURN  FOP  PATE  P  Pi' 

.TOP  '  T.  "Pit 

05950  0C6A  04 

FCB 

4 

05960  0C6B  1A07 

HDRMS2 

FDB 

$1A07,$0D0A 
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0  5  970 

0C6F 

45 

FCC 

o^to 

OC8F 

20 

FCC 

C  60>U0 

0C9C 

41 

FCC 

06010 

0CB2 

ODOA 

FDD 

06020 

0CB4 

52 

FCC 

06030 

OCCE 

0008 

MAXCPR 

RMB 

06040 

0CD6 

20 

FCC 

06050 

0CE2 

ODOA 

FDB 

06060 

0CE4 

43 

FCC 

06070 

OCRS 

ODOA 

FDB 

06080 

0CF7 

41 

FCC 

06090 

0D11 

0008 

CPRACH 

PMB 

06100 

0D19 

20 

FCC 

06110 

0D25 

ODOA 

FDB 

0612.0 

0D27 

41 

FCC 

06130 

0D3B 

ODOA 

FDB 

06140 

0D3D 

45 

FCC 

06150 

0D57 

0005 

CPREFF 

RMB 

06160 

0D5C 

20 

FCC 

06170 

0D6B 

ODOA 

FDB 

06180 

0D6D 

43 

FCC 

06190 

0D7D 

ODOA 

FDB 

06200 

0D7F 

45 

FCC 

06210 

0D99 

0005 

TIMEFF 

RMB 

06220 

0D9E 

20 

FCC 

06230 

OD.'L 

ODOA 

FDB 

06240 

ODFl 

43 

FCC 

06250 

odcb 

0005 

COLDER 

RET 

06260 

ODDO 

20 

FCC 

06270 

ODDF 

ODOA 

FDB 

06280 

ODE  3 

43 

FCC 

06290 

ODFD 

0008 

AMAXX 

RTB 

06300 

0E05 

20 

rcc 

06310 

0E11 

ODOA 

FDB 

06320 

0E15 

1 

1  J 

FCC 

05330 

0E2F 

0008 

AM  I  NX 

pj  T> 

06340 

0E37 

20 

FCC 

06350 

0E43 

ODOA 

FDB 

06360 

OF, 47 

43 

FCC 

06370 

01X1 

0008 

ATAXY 

RMB 

06380 

0E69 

20 

FCC 

06390 

0E75 

ODOA 

FDB 

06400 

or  7  9 

43 

FCC 

06410 

OF  93 

0008 

MMINY 

RMB 

06  420 

ok  on 

20 

rcc 

06  3  0 

OF. A  7 

ODOA 

FEB 

06  440 

or  AM 

43 

ICC 

06450 

ore  5 

0008 

A’AXZ 

IMF. 

06460 

OECD 

20 

ICC 

06470 

0ID9 

ODOA 

FDB 

06480 

OEDD 

43 

ICC 

06  490 

OF  :i-'7 

BOOR 

A-UNZ 

RMB 

06500 

OKFF 

20 

ICC 

/ekg  sample  collection  statistics/ 

/  :  PAGE  2/ 

/  T-  -  •  '-'-N  FC. 

$ODOA 

/RATIO  POSSIBLE . / 

8 

/  :  1  / 

$0D0A 

/COMPRESSION  RATIO/ 

$ODOA 

/ACHIEVED . / 

8 

/  :  1  / 

$0D0A 

/ACHIEVED  COMPRESSION/ 

$0D0A 

/EFFICIENCY . / 

5 

/  %  OF  MAXIMUM  / 

SODOA 

/COMPRESSION  TIME/ 

SODOA 

/EFFICIENCY  OBTAINED  .  .  .  / 

5 

/  %  SMP  INTERVAL/ 

SODOA, SODOA 

/COLLECTION  DURATION  .  .  .  / 

5 

/  SECONDS  / 

SODOA, SODOA 

/CHANNEL  X  MAXIMUM  .  ...  / 

8 

/  VOTE'S  / 

SODOA, SODOA 

/CHANNEL  X  MINIMUM  .  ...  / 

8 

/  WINS  / 

SODOA, SODOA 

/CHANNEL  Y  MAXIMUM  .  ...  / 

8 

/  VOLTS  / 

SODOA, SODOA 

/CHANNEL  Y  MINIMUM  .  ...  / 

8 

/  VOLTS  / 

SODOA, SODOA 

/CHANNEL  Z  MAXIMUM  .  ...  / 

8 

/  VOLTE  / 

SODOA, SODOA 

/CHANNEL  Z  MINIMUM  .  ...  / 

8 

/  VOLTS  / 
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06 510  0F0B  CDOA 

FDD 

■8  ODOA,  8  ODOA 

06820  0!'0F  *13 

FCC 

O  .  " 

/COMMENTS . / 

l :  . .  . 

06550  OF 6 2  50 

FCC 

/PRESS  RETURN  FOR  PACE  3  OF  STATISTIC 

06560  OF  8  8  04 

FC13 

4 

06870  OF  09  1A07 

COSTAT  FDD 

$1A07 , soccn, FOAOA, SCAOA, ?PAOA, 80 AO a 

06500  0F95  45 

FCC 

/i.KG  SARI 4 ,!'  OOI. I !  Ci'IC’J  STATISTICS:  PA 

06590  Ol'DD  ODOA 

FDD 

$0D0A  CP/ 1 3 

06600  Ol’DF  20 

FCC 

/  NUMHRR  OF  SAMPLES  TAKEN  / 

06610  CI'D 8  28 

tee 

li 

C 

W' 

1 

06620  OFF?  0004 

i.vmsrp  a  id 

4 

06630  0FF6  20 

j.'CC 

/  (HEX)/ 

06640  OFFC  ODOA 

FDD 

80D0A  ay  ip 

06 6 50  OFF!-:  20 

FCC 

/  MAXIM 2!  I, OOP  COUNT  H  R/ 

06660  100r'  20 

ix:c 

/  INTER1THT  (IPCAJ.)  -  / 

06670  1019  0002 

nvmrps  r”d 

2 

066  80  1C1D  20 

FCC 

7  (HEX)/ 

06690  1021  Oi'MA 

FDD 

$0D0A  CP/LF 

06700  1023  20 

FCC 

/  TOTAL  WAIT  LAG  LOOP  COROT'S  DURING/ 

06710  1044  20 

FCC 

/  COLLECTION  (LOG?CT)=  / 

06720  105A  0008 

I'OTLUP  123 

8 

06730  1062  20 

FCC 

/  (HEX)/ 

06740  1068  ODOA 

FDD 

$0D0A 

06750  106 A  54 

FCC 

/TIME  EFFICIENCY  =  (l-(IGOPCI'T  (SAMITIO 

06760  1097  2A 

FCC 

/*100/ 

06770  10913  ODOA 

FDD 

$0D0A,$0D0A 

06  7  R)  1091'  43 

FCC 

/CHANNEL,  MAXI  MIMS  A!3  MININ'. 'MS/ 

06790  1DBC  ODOA 

FDD 

$0D0A 

06800  10FE  20 

FCC 

/  XMAX=  / 

06810  10C5  0002 

XTAXNM  PI  3 

2 

06  820  1  0C7  20 

FCC 

/  (HEX)  AT  SAMI’!  ,H  MUMPER  / 

06  830  10DF  0004 

XHAXLO  123 

4 

06840  10F3  20 

FCC 

/  (HEX)/ 

06  850  10F9  ODOA 

FDD 

$ODOA 

06  860  10EB  20 

FCC 

/  XMTN~  / 

06  870  10F2  0002 

XMINNM  RJ-3 

2 

06880  10F4  20 

FCC 

/  (HEX)  AT  SAMPLE  NUMEl'Jl  / 

06890  HOC  0004 

XKINLO  KB 

4 

06900  1110  20 

FCC 

/  (HEX)/ 

06910  1116  ODOA 

FDD 

$0D0A 

06920  1118  20 

FCC 

/  YMAX=  / 

06930  111F  0002 

YMAXNM  F23 

2 

06940  1121  20 

fcc 

/  (HEX)  AT  SAMPLE  NIMPFR  / 

06950  1139  0004 

ymaxio  pud 

4 

06 960  113D  20 

FCC 

/  (HEX)/ 

06970  1143  ODOA 

FDI3 

SODOA 

06980  1145  20 

FCC 

/  YM1N-  / 

06990  114C  0002 

YHIT3M  123 

2 

07000  114F  20 

FCC 

/  (HEX)  AT  SAMPLE  NIAIEKP,  / 

07010  1166  0004 

YMINLO  I2-1D 

4 

07020  1 16A  20 

FCC 

/  (!!EX)/ 

07030  1170  ODOA 

FDD 

SODOA 

07040  1172  20 

FCC 

/  ZMAX-  / 
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/  AT  FA'TT.F  NUMBER  / 


/  (HEX)/ 

$ODOA 
/  ZMIN=  / 

2 

/  (HEX)  AT  SAMPLE  NUMBER  / 

4 

/  (HEX)/ 

$ODOA,?ODOA 

/COt-1  PR  ESS  ION  STATISTICS:/ 

$0D0A  . 

/  MUI-1BER  OF  MEMORY  BITS  / 

/AVAII  ABLE  =  / 

6 

/  (HEX)/ 

$CD0A  „  . 

/  NUMBER  OF  BITS  AVAILABLE/ 

/  TO  VAR  LIN  CODER  =  / 

8 

/  (HEX)/ 

$0D0A  , 

/  TOTAL  NUMBER  OF  DATA  BITS/ 

/  STORED  =  / 

8 

/  (HEX)  / 

?0D0A  _ , 

/  NUMBER  OF  BITS  USED  TO/ 

/  STORE'  CHANNEL  X  =  / 

6 

/  (HEX)/ 

$0D0A 

/  NUMBER  OF  HITS  USED  :0/ 

/  STORE  CHANNEL  Y  =  / 

6 

/  (HEX)/ 

80D0A  „ . 

/  NUMBER  OF  BITS.  USED  TO/ 

/  STORE  CHANNEL  7,  =  / 

6 

/  (HEX)/ 
cnriflA 

/  NUMBER  OF  hits  USED  TO./ 


07050  1179  0002 

n~r'/'  Vf7^  RP 


07080  1197  20 
07090  11  PD  0D0A 
07100  11  OF  20 
07110  11A6  0002 
07120  11A8  20 
07130  11C0  0004 
07140  11C4  20 
07150  11CA  0D0A 
07160  11CE  43 
07170  UF5  0D0A 
07  1  80  11E7  20 
07190  11FE  41 
07200  120A  0006 
07210  1210  20 
07220  1216  0D0A 
07230  1218  20 
07240  1231  20 
07250  1245  0008 
07260  124D  20 
07270  1253  0D0A 
07280  1255  20 
07290  126F  20 
07  300  1  27  9  000  8 
07310  1281  20 
07320  1287  ODOA 
07330  1289  20 
07340  12A0  20 
07350  12.E3  0006 
07360  12B9  20 
07370  12.BF  ODOA 
07 3 CO  12C1  20 
07390  12D8  20 
07  400  1  2EB  00C6 
07410  12F1  20 
07420  12F7  ODOA 
07430  12F9  20 
07440  1310  20 
07450  1323  0006 
07460  1329  20 
07470  132F  ODOA 
07  4  80  1  33  1  20 
07490  1348  20 
07500  1362  45 
C7510  1369  00r6 


ZMAXNM  RMB 

pcc 

FCC 

FDD 

FCC 

ZHINNM  PN33 
FCC 

ZMINLO  RMB 
FCC 
FDD 
FCC 
FDB 
FCC 
FCC 

AVABIT  RMB 
FCC 
FDB 
FCC 
FCC 

topbit  PMB 
FCC 
FDB 
FCC 
FCC 

TOTBIT  PMB 
FCC 
FDB 
FCC 
FCC 

XBITNM  RMB 

fcc 

FDB 

FCC 

FCC 

YBITNM  RUB 
FCC 
FDB 
FCC 
FCC 

ZBI7NM  RT-TB 
FCC 
FDB 
FCC 
FCC 
FCC 

tbitnm  r'-ib 
ICC 
FDB 
FCC 
FCC 
ICC 
FDB 
FCC 


/  STORE  TIME 
/ETER  =  / 

6 

/  (HEX)/ 

$0D0A 

/compression 
/DATA  HIT’S  • 
/BITS  AVAL!/ 
SODOA, S0M23 
/PRESS  El  TURN 


PA.'i’lO  -  TOTAL  / 
K-R13J  PEP.  ME”*  / 
H 1 37 

-/ 


07520  136F  20 
07530  1375  ODOA 
07540  1377  43 
07  5  50  1  391  44 
07560  1 3AA  42 
07  570  1  3 PR  ODOA 
07  5  80  1  3 PC  50 
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PRSTAT-9 


I 


07590  13CA  04  FCB  4 

07600  * 

07  H  C  *  END  OP  PRST/.T 

07620  * 

07630  END 


L 
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NOCPRS-7 


00030 

00000 

00070 

oooso 

00090 
001  CO 
00110 
00120 
00130 
00140 
00150 
00100 
00170 
001  00 
001 90 
00200 
00210 
00220 
00230 
00240 
00250 
00260 


★  ft******:  **********************************  ******  ** 

* 


*  o'.  LI  j  .7  ’  ;  j  :  *  m.r*'n  s 

*  AUTHOR  :  CATT.  MEL  TO.l’SLND 

*  VERSION  :  1.7 

*  VERSION  DATE  :  3  OCT  80 

* 

************************************************** 

* 

*  OVERLAY  DESCRIPTION 

★ 

*  THIS  OVERT  AY  SAMPLES  THE  EKG  DATA  VIA  THE 

*  A/D  CONVFJ.TEIES  AND  STORES  THE  8  BIT  LCT'DIFD 

*  VALUES  INTO  ."EMORY  LOCATIONS  3C00-7E!  F.  THE 

*  THE  X,Y,Z  CHAM’ i!  3  S  ARE  SAT4PLFD  AL'D  STORED 

*  SEQUENTIALLY  START  TNG  AT  3C00  AND  WORKING  UP. 

* 

**********************  ***************  ********* -****** 
*******************  *  *******  ********  **************** 


00270 

0100 

ORG 

$0100 

OVERIAY  START  ADDRESS 

00280 

* 

00290 

OFT 

0 

AS  SB  OFT-GE!  CIV  FILE 

00300 

OFT 

LOG 

AS  SB  OPT- SUPPRI SS  FULL  I  VC  LI 

00310 

* 

00320 

*************************************  ******  ******* 

00330 

* 

00340 

*  LADLE  DEC! 

ARATTOES 

00350 

* 

00360 

*  SUPPORT  SI 

’BROUTINE 

ADDRESSES 

00370 

* 

003  80 

CAS7 

CUTLET  DOU 

SGRH7 

rmoKDOs.  alph  string  tv  cons 

00390 

CASE 

OUT’CR  mu 

SCAPE 

!*•  Hams.  ALP!!  UTRE/VC  C'F! 

00400 

CA2C 

KE'TD  JOU 

$C'"C 

\:-rr nos.  oomssl.*:  input  fa  ti 

00410 

CA36 

KID  I  DO  mu 

SCR  3  6 

! plot  tvs.  o'ESf’E:  i:vn .  so? 

00420 

1D00 

START  DOE 

S1D00 

IDG-raC.  START  LKO-ENFC 

00430 

* 

00440 

*  DATA  Bill’ll 

AS 

00450 

* 

00460 

3400 

HDESTR  mU 

$3400 

DATA  PUi'CE  ATP 

00470 

FEE  8 

11'0’VEC  LOU 

SFFF8 

IMTEjUTDlM’ 

004  80 

1C96 

STKSAV  F)QU 

SIC  96 

fLWCK  JV*'  ’’  1  •'  ’ 

00490 

1C98 

CPRTYP  ECU 

S1C98 

OOMPH!  SI  U  Ai  .  C:  EL 

00500 

3002 

EIDBUF  mu 

S3  002 

ADDP  (  :  ]  AT  Hi  A’  i : 

00510 

1C9D 

vix's.av  rou 

S1C9D 

Tpo  v:  cor  i  p: 

00520 

1CA1 

FILMIC  LOU 

S1CA1 

Ell  Hi:;-*  A  :  '•  i  .  ' 

00530 

1CA3 

SAVFLC  FOE 

SI  (  A3 

S/\\.  i  i  1 1  /  ’J  i  . 

00540 

34  60 

IOOIVT  mu 

$3490 

'P’CAJ ,  N".1  '!’i;  ;  - 

00550 

3494 

f.A*  !IT  !0  \ry : 

$34  °4 

Y\"  TV.:\  (  V  L  ■  r 

0  0  560 

34% 

I.K’AT.  mu 

$34% 

AVC’D  MAX  i/  VP  A  :  ' 
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00970 

3497 

r-’AYz  irn  ’ 

834  97 

MAX 

VLU  JM  Cli  7. 

r  -  -  . 

n  t r  • 

fl/oo 

*  *  A  V 

vlu  i /*•  t  cm  7 

OOoim 

34  9i> 

MIX/iD  7 

■  “1  ‘  l-'-, 

-.-J.-:  Jl 

*  X 

...  -  ICC  ...  1 

0CG1C 

349D 

M/AY  l:QU 

$3490 

MAX 

vlu  j:;  c:i  v 

00620 

349L 

NAXYLO  I  Cl’ 

$34  911 

MAX 

3T,U  I/XJ  i:;  CM  Y 

00630 

3  4  A0 

MINT  ECU 

$3  4  A0 

MIM 

vlu  r>:  cm  y 

006  40 

34A1 

minylo  lou 

834.31 

MLN 

vlu  ioc  i::  cm  y 

00650 

34A3 

MAXX  LOU 

$3  4  A3 

max; 

\t;j  in  cm  x 

00660 

3  4A4 

MAXXLO  LQU 

$34.34 

ma; 

VLUE  I. DC  IN  CM  X 

00670 

34A6 

MINX  EQU 

S34A6 

mil: 

VLU  IN  CM.  X 

006  80 

34A7 

M1XXLO  LOU 

$34A7 

min 

VLU  IOC  TM  Cl!  X 

006  90 

34AC 

17171?  IT  10  V 

$3  4  AC 

•'I’M 

OF  BITS  lic;t)  TO  FIT:  U'.'f. 

00700 

3  4  B0 

KBITS  BQU 

S34P-0 

rfm 

OF  BUS  USED  TO  F  IT  X 

00710 

34B3 

YBITS  EQU 

S3-'  L33 

3.77 1 

OF  RJ1S  LSI  1)  ‘:v7  SA7  v 

00720 

34156 

ZB1TS  :  X  ’U 

$3416 

’  1 

C"  l'l' O  FELT)  rl'"  C'  ’ ’  " 

00730 

34B9 

TBITS  ECU 

$34P9 

mi.’  T'or.T'i  'j*', 

00740 

34IC 

ACLLCT  FQF 

$34, 

LU 

Tc  $v;  ~  9C>  yrr  LX  C"M  I-FCC 

00750 

3600 

XPDI'i!  ecu 

$3600 

0  31 

U  LOT  '  F  X  I  LF 

00760 

3  800 

YPDH1  EXj’J 

$3  L00 

0  \T 

»/<•  'ji'  v  ]  r;M 

00770 

3A00 

ZFDFM  EQU 

S3A00 

0  VI 

U  I  CO  OF  7.  ILF 

007  80 

3E00 

TPDF  EQU 

$3  LOO 

0  31 

u  loo  to  ttm;  par 

00790 

3C00 

SECZRO  EQU 

$3C00 

cr.v,: 

T  OR  11.33 'A  MI  M  FI  IN 

00800 

* 

00810 

*  HARDWARE 

ADDRESSES 

00820 

★ 

00  830 

E400 

ADCZRO  EQU 

$E400 

7  J  >T 

CMA.NMFi,  711.0 

00840 

E404 

ADCTCO  EQU 

$F40  4 

4mv: 

Cl1  •'•.’.MIL  TOO; 

00850 

E500 

DACZRO  LOU 

$F500 

D.\C 

CHANIN  I. FRO 

0  0  860 

* 

00870 

★ 

00880  *FUNCTION  jNOCFRS 

00890  *  INPUTS  : STATUS  D.  3-TIT'?  IT  .01!  EEC- EXEC 

00900  ♦OUTPUTS  TATA  riO  DISK 

00910  *  CALLS  :  OUTPUT,  F  o  •  DM  , ;  "•  YL'F ,  CCNNCR 

00920  *  KEYBDO ,  SAV1 VL ,  S';  i  177 

00930  ♦DESTROYS  :ALL  RIOT";  FIT 

00940  *PURPOSE  :TO  COLIA 03  3  OCTllfl  (T  LKG 


00950 

*  DATA  AND  STORE  INTO 

I':  .  iOIXX 

00960 

* 

00970 

•k 

00980 

0100 

OF 

NOCPRS  SF.I 

00990 

010] 

CE 

02.73 

IDX 

fSTITSG 

01000 

01  04 

r.n 

CALF 

JSR 

OUINCR 

,i]C  'V||  •  t  r  <7V:']  rq  r;,  ••  li 

01010 

01 07 

FD 

CYL’C 

JFR 

ICUYI'l) 

cue  ilf:t;;ff  n.Ji  console 

01020 

0]  PA 

it, 

3002 

IjDX 

END1TF 

01030 

01CD 

09 

DEX 

01040 

01CF 

16 

00 

IDA  B 

0,X 

01050 

0110 

Cl 

r9 

CLP  B 

ii'Y 

TS  I>Tp[TrP  C7T5 

01060 

0112 

27 

03 

F.UQ 

NOCPR1 

01070 

0114 

711 

1D00 

JMP 

START 

MO.  DIN  TO  iNC-!Nl  ■' 

01080 

0117 

CM 

4!  43 

1 X  CPI  31  IDX 

$41.43 

FLAG  (X7M7.1SS1CN  TIL  (MC) 

01090 

Oil  A 

FF 

1C98 

crry 

(.r.,r,r,.n 

01100 

OLID 

BD 

051 A 

JFR 

FILi/MP 

Sl.'j’  IT  DA', >3  FILE  HF/RFR 
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NOCPRS-7 


01290 

01300 

01310 

01320 

01330 

01340 

01350 

01360  0153  01 
01370  0154  Cl 
013  GO  0155  01 
01350  0136  01 
01400  0157  01 
01410  0158  01 
01420  0159  75 
01430  01 5C  01’ 
01440  01 5D  3F. 
01450  oi5r:  or: 
01460  01 5F  PC 
01470  0162  08 


01510  0168  08 

01520  oi6c  rr  022c 

01530  016F  136  0  23  2  SI ’003 

01540  0172  81  00 

01550  0174  26  F8 

01560  * 

01570  ***** 

01580  * 

01590  *  END 

01600  * 

01610  ***** 

01620  * 

01630  0176  OF 
01640  0177  CF  4000 


02B5 

IDX 

#IROMSG 

OJ  »  V  •> 

•*7  »'Cw*rM  '  TT  M1  ** r  /'▼n  ** r.’-’A'  n 

3C00 

FCCI-GO  IDX 

-SECZPO 

INITIALIZE  MEM.  :  LR  S'jAF.T  LOC 

0230 

SIX 

BUFPTR 

STORE  IN  REEFER  POINTER 

03 

lda 

A 

#3 

PICK  UP  (DUMP  FOR  TIME  GAL 

0227 

STA 

A 

calcnt 

STORE  IN  BITTER 

FFP8 

IDX 

IRQVEC 

pick  up  cue”.:::  irq  vector 

1C9D 

STX 

VECSAV 

SAM  E-:  BUFFER 

0  51 F 

TIMCAL  r.L'X 

#CALINT 

GET  INTR  VECTOR  ADFP  FOR  CAL 

ITFG 

STX 

IRQVEC 

PI1']’  IN  V'T7TG'\  /  nr'^  FS 

00 

LDA 

A 

#0 

IT^IT  CCXeTITm'  FO;>  2 5' a  r_TST  LO' 

02.3  2 

STA 

A 

DOM’S  T 

store  r:  dontst  buffer 

0000 

LDX 

#0 

CLEAR  LOOP  COUNTER 

022C 

STX 

IROCNT 

(.’22E 

STX 

IROG:T-i2 

1500 

STX 

DACZRO 

p.'lsf.  int  enable  cipcjit 

09 

FRA 

SPOOl 

FRA  IO'  COUNTING  LOOP 

kk"kkkkkkkkk 

** 

kkkkkkkkk 

**************************** 

*  BASIC  TIMING  I /TOP  FO 

EFFICIENCY  TEST 

kkkkkkkkkkkkkkkkk  kkkkk  kkkkkkkkk  kkkkk kkkkkkkkkkkkkk 

SPLOOP  NOP 

DELAY  TO  MATO: i  TIME 

nop 

IT  TAKES  TO  EX'- CUTE  TEE 

NOP 

IKCR1T2EXT  OF  FA  ITS  35-4 

NOP 

OF  TEE  I.OO?  ecu: DTK 

NOP 

win:  co'  '.t  cap  Firs  70 

NO? 

HIGH  2  FAILS  CF  4  :  'TIE 

OloF 

JMP 

SP003 

JUMP  IO  COX':  IN' T  1/TP 

SPOOl  CLI 

PREPARE  FOR  TTN'-R  INT 

V.'AT 

STOP  PROCESSOR  f.  V.'A.jT 

SP004  CLI 

022E 

IDX 

IROG1T+2 

RET' ED  FRO:  1  INT,  INC  OCH.Ti' 

TNX 

022E 

STX 

iroo:t+2 

SAM  IT 

FT3 

BNE 

SPLOOP 

COUNT  go: :c  ffff  to  onoo? 

022C 

LDX 

IROCNT 

YES.  INC  1  FRIES  3 Si 4 

INX 

022C 

STX 

IROCNT 

SAM  COUNT 

IDA  A  DON'i'ST 
CMP  A  10 
ONE  SP004 


IS  DONE  TEST  SATJSII'IFD? 
NO.  KEEP  logpi;  :g 


kkkkkk’kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk'kk'k-- 

k 

*  END  BASIC  TIMING  I >00?  FOR  LTF  TEST 

* 

kkkkkkkkkkkkkkkkkkkkkk'k’kkkkkkkkkkkkkk'kk'kk^ 

k 

SET  PREVENT  SEE  '1X3  DP 

IDX  #$4000  PICK  UP  I  MR  01 T  i.<. 


SEE  '1X3  r- 
IMR  OFF 
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CIO  A. 

01 7  A 

FF 

FT  00 

SO”! 

DACIT.O 

1M  i  •  r;.\  r  ; * 

m  r  r  ;■> 

pi  7n 

F.7 

F  400 

STA 

A 

ADCMRO 

g ,n  rivcCO  f:t  hop  flop 

U^.v 

7  A 

i.  227 

CM  C 

i  A  < 1  2  2  C2  0 

01690 

018-2 

27 

38 

P.FQ 

SPDONE 

IS  OOF  AT  3?  YES,  CO  SAVE  LATA 

01700 

01  I -3 

F6 

0227 

IDA 

A 

CALC  IT 

MO.  (A  T  covirr 

01710 

0189 

81 

02 

cir 

A 

is  couvr  2? 

01720 

018?. 

26 

22 

PI  IK 

PARSAV 

NO,  SAVE  mEAM-ATEE  FROM  IN? \T 

01730 

oiro 

FE 

022F 

IDX 

ninaiT+2 

YES.  SAVE  TIME  LOCO  OMAMTME 

017  40 

0190 

FF 

022A 

STX 

GALON E 

01750 

0193 

CF. 

C  3  5  5 

IDX 

*iSAMnLK 

MOV  ITT  SA?4FLE  ADD!  FI  lEOYMC 

01760 

0193 

FF 

FIFO 

SAX 

IKQVEC 

01770 

0199 

16 

AA 

IDA 

A 

fiSAA 

SET  UP  DCMTST 

017  80 

0192 

B7 

0232 

STA 

A 

DC-IMST 

01790 

01 9E 

CK 

0000 

IDX 

#0 

CLR  IOO?  COUNT  AND  SAMPLE  COU 

01800  01  Ml  FF  022C  STX  IRQG1T 

01810  01A4  FF  022E  SIX  IROG37+2 

01820  03  A7  FF  3 '94  STX  SX-IF.'O 

01830  01 7. A  FF  E5C0  S'l’X  DAC7E0  ITLMT.E  TIMER  IMTEER FA'S 

01840  017JD  20  AD  RFA  SF001  GO  V.7JT  FOR  LITE EEYPj' 

01850  01AF  FE  022C  PARSAV  IDX  IRQC.’T  SAVE  If. OP  COUNT 

01  86  0  01B2  FF  3490  SIX  L-OOPCT 

0  1  87  0  01B5  FE  022E  IDX  IP.OG:T+2 

01880  01B8  FF  3492  SIX  I/XTCT+2 

01890  01  ED  71:  01? A  JMP  T1MCA.  CO  EXECUTE  74, CTREE  TIME  CAL 


01900 

01  BE 

B6 

022B 

SF1X7ME 

LEA 

A 

CALGMAl 

AVEEA.CE  '-.V'O  TIME  CM  ECU: 

01910 

01C1 

BB 

022F 

ADD 

A 

1RCGIT+3 

AJ  '  -  IS?  BY3TS 

01920 

01 C4 

B7 

0229 

STA 

A 

GALZI  '.C-i-l 

see  Oil  in  mtm.tr 

01930 

03  C7 

BO 

021 A 

IDA 

A 

CAT CNF 

7iC  ’  U7  l  c7  OF  FTFS? 

01940 

01.CA 

H9 

022E 

ADC 

A 

IF.0GI7+2 

/TO  VIM!  CM  'EY 

01  950 

01CD 

137 

0228 

STA 

A 

GW  20 

S'iCEI  PI  .-.Mi'.'TE 

01960 

01D0 

77 

022H 

AS  R 

CAL  2  3.0 

DIVIDE  BY  2  TO  AVERAGE 

01970 

01D3 

76 

0229 

RCF 

CALL!  .0+1 

01980 

01  Do 

f\) 

08 

ID-A 

A 

■■8 

SE'n  UP  COULTER  FOP.  ,/256 

01  990 

01D8 

77 

0228 

G’\I  ,SI  IF 

ASP: 

GMMI’.O 

MG'  DIVIDE  BY  236  FOE 

02000 

01173 

76 

0229 

ROE 

CAL2EG+1 

LOOMS  'T ITIIRI  VIM 

02010 

01BF 

4  A 

DEC 

A 

02020 

01.  PF 

/A) 

F7 

17 IF 

GALSEF 

8  VF-T? 

02030 

011:1 

VO 

0229 

IDA 

A 

G\L7.70+1 

PICT:  UP  SiillMEF  MESUIT 

02040 

01 F4 

137 

3  A.  83 

STA 

A 

LI  CM. 

SO  CEE  r:  FILM  EAR  EYM  YE 

02050 

0117 

F6 

J  ‘U  A 

IDA 

A 

DTAEIT-O 

1 ’  7  V  p v pa  r ? -|  «r*  c'o; "  .7  ] ' "  ■  •f'  : 

02060 

01 IA 

?7 

7  /4  r  r 

STA 

A 

ACF:  I  CT‘+3 

Si  MCE  MO  CCMiREOOK.-M  PERIr 

02070 

01  ID 

B6 

34.  AM 

IDA 

A 

DTAr-IT+2 

02080 

01E0 

B7 

347.7 

STA 

A 

ACPI  CE+2 

C2090 

01E3 

F6 

34/D 

IDA 

A 

DIAOIT-f] 

02100 

01F6 

17 

3-M  D 

STA 

A 

/LOT  ,C?-i  1 

02110 

01F  9 

ir, 

3 -VC 

IDA. 

A 

DTABIT 

021  20 

01IC 

137 

3  4  re 

STA 

A 

ACEI.CT 

02130 

03  FF 

FE 

3  COD 

IDX 

VECSAV 

YES.  RESTORE  IRQ  VFCT'OE 

02140 

0202 

FF 

pi/M  'O 

SIX 

IRQVEC 

02150 

0205 

CD 

0312 

IDX 

TEAS:  ISO 

02160 

0208 

IT) 

CAO-F 

a  sr 

OUT  ICR 

" SAM n ,  1' IG  CD* ' El .ETF ..." 

02170 

020  P 

ID 

(M-,20 

JSR 

KEYED 

GET  SAVE  D’  VISION 

02180 

020F, 

FE 

3002 

IDX 

ENDBUF 
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nocpps- 


0/1  09 

0211 

09 

DUX 

02200 

0212 

F6  00 

IDA  B 

o,x 

C  f  i‘ 

02]  4 

c  ]  •:  9 

r" '  ''i  p 

c  .  1 j 

y  1  Y 

ir»  r" ; *:r Tr:  *r ^ 

Y  i! 

•VM  n 

03 

..... 

injur 

*  V-N  '  '  '•  •  * 

02230 

0218 

P.  D  051 

5  JSR 

SAVEi’L 

yes.  save  n:;:  file  on  disk 

02240 

021P 

CF  03  81  IDX 

7SDONE 

02250 

021E 

I’D  CA8F  JSR 

a’ TICK 

02200 

0221 

ID  CA2 

C  JSR 

KEYDD 

02270 

0224 

7E  1D00  FXJMP  JMP 

START 

JUMP  BACK  TO  KKG-EXEC 

02280 

* 

02290 

0227 

00C1 

CALC  IT  RIB 

1 

TEST  CAE  IDO?  COUNTER 

02300 

0228 

0002 

galzeo  p:b 

2 

AVG'D  GAL  I /XT'S  DUPING  DAT  C 

02310 

022A 

0002 

CM, CDF  KB 

2 

TEMP  BIT’  FOR  PTE  CM,!, PC  G'L 

02320 

022C 

0004 

IRCCIT  KB 

4 

TEMP  1NTR  LOG?  COUNTER 

02330 

0230 

0002 

BL’FITTR  RIB 

2 

BUFFER  POINTS  i  OT  NIC  IT  AVAIL 

02340 

0232 

0001 

DONTST  KB 

1 

DONE  TEST  FLG  FOR  MEM  FUEL 

02350 

* 

02360 

0233 

17.07 

S7RMSG  FDR 

S1A07 

02370 

0235 

54 

FCC 

/TJIS  U 

ODULE  S.AI-rnl,r’S  TUr  FT’G  / 

02380 

0251 

49 

FCC 

/INPUT  . 

7A D  STCRID  THE  DATA  NTTli/ 

02390 

026F 

ODCA 

FDB 

SODOA 

02400 

0271 

4E 

FCC 

/NO  DAT 

A  COMPRESSION./ 

02410 

0285 

ODOA 

FDB 

SODOA,  $ 

ODOA 

02420 

0289 

44 

FCC 

/DO  YOU 

NISH  TO  EXECUTE  THIS  / 

02430 

02A5 

4D 

FCC 

/MODULE 

(Y  OR  N) / 

02440 

021:4 

04 

res 

4 

02450 

02B5 

1A 

IRQMSG  FCD 

$1A 

02460 

0226 

49 

FCC 

/IN  SUP:. 

SUBJECT  AND  EKG  DEVICE  / 

02470 

02D4 

52 

rcc 

/READY!/ 

02480 

02DA 

ODOA 

FDD 

SODOA, SODOA, SODOA 

o 

t\_> 

,N 

O 

op.eo 

50 

FCC 

/TRESS  RETURN,  TUN  CNOSF  INTERRUPT/ 

02500 

0302 

20 

rcc 

/  ENABll 

'  SWITCH ./ 

02510 

0311 

04 

FCB 

4 

02520 

0312 

1A07 

SAVMSG  FDB 

S]  7:07 

02530 

0314 

53 

FCC 

/SAMPLING  COMF1, FTE.  PLEASE  OPEN  / 

02540 

0334 

49 

FCC 

/INTERN! 

•FT  Cl/BI.E  SNITCH./ 

02550 

03  4C 

ODOA 

FDB 

SODOA, SODOA, SODOA 

0256  C 

0352 

44 

FCC 

/DO  YOU 

WISH  "C>  S7VT  THIS  DATA  ON  / 

02570 

0373 

44 

FCC 

/DISK  {\ 

‘  OR  N)  / 

02580 

0310 

04 

FCB 

4 

02590 

0381 

20 

SDONE  rcc 

/  PRESS 

RETURN/ 

02600 

0362 

04 

FCB 

4 

02610 

02620 

**********************************  x  -A  *  x  ********  *  * 

02630 

■D  NOCPRS 

02640 

★  *  -k  *  *  *  *  *  *  *  *  *  *  *  *  *  * *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  *  * *  *  r.  * K  7.  *  >.  A  *  *  *  >  * 

02650 

* 

02660 

* 

02670 

*  FUNCTION  :  S/.UPI  ,F 

*INPU'1I  :  STAB 

S  SUFFER 

S 

02690 

♦outputs  :cc::r 

MESSED,  E 

CCNDED  DATA  IN  UK'  I  ITU 

02700 

*CAI.I,S  :  NOT  IT 

»  •  r* 

.  A  J 

02710 

♦PURPOSE  : B FIS 

p,  t  ".r  : 

SAURI  ES  THU  FUG  IT  N  .', 

02.7  20 

*  ROUNDS  'll  IF,  VALUES  70 

J  BERN  (103  .1?) 
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02730 

*  CALCULATES 

”AY  M I *  ’ 

■  A.,.  .1.., 

*  OF  PITS,  SAMPLES 

027/0 

*  Eli:.,  AND  8 

IAVFS  7LF 

SE  PAI<AM  AND  DATA 

027  GO 

* 

02770 

* 

02780  03  8F  0001 

SHFRUF  RIB 

1 

TEMP  SHIFT  BUFFER 

02790  0390  0001 

TEMPAl  FEB 

1 

TIE  IP  REG,  MSB  QI  0 

02800  0391  0001 

TIE  0131  PEB 

1 

TEMP  REG,  LSB  QI  0 

02810  0392  0001 

TK1PA2  PE  3 

1 

TEMP  REG,  MSB  CH  1 

02820  0393  0001 

TEMPT  2  PE -3 

1 

TEMP  BUG,  LSB  GI  1 

02830  0394  0001 

TEMPA3  FE’3 

1 

TEMP  REG,  MSB  CO  2 

02840  0395  0001 

TEMFB3  RMB 

1 

TEMP  REG,  LSB  Qi  2 

02850 

•k 

02060  0396  FE  3494 

SAMPLE  LDX 

SAMFNO 

GET  CUR  SAM PL  COUNT 

02870  0399  OS 

INX 

02880  039A  FF  3494 

CTX 

SAMFMO 

02890  03 9D  BF  1C 96 

STS 

STKSAV 

SAVE  STACK  PP.T 

02900  03 AO  8E  7280 

LDS 

II  $3 2  80 

INITIALIZE  S77.ni  IN 

02910  0372$  CE  E4C0 

LDX 

IfADCZRO 

NOT  PUT  SE  A/D  TO  STA 

02920  03A6  A7  00 

STA  A 

G,X 

FOR  QIANNEL  0 

02930  03A8  01 

NOP 

02940  03A9  A6  00 

IDA  A 

0,X 

02950  03AB  F6  01 

IDA  B 

i,x 

02960  03 AD  B7  0390 

STA  A 

TEMPA1 

02970  03F0  F7  0391 

STA  B 

TEMPBl 

02980  03B3  08 

INX 

02990  03B4  08 

INX 

03000  03B5  A7  00 

STA  A 

0,X 

NOT  PULSE  A/D  FOR  CO! 

03010  03 R7  01 

NOP 

a;  CHANNEL  1 

03020  03B8  A6  00 

LDA  A 

0,X 

03030  03EA  E6  01 

LDA  B 

i,x 

03040  03 PC  137  0392 

STA  A 

TEMPA2 

03050  03 BP  F7  0393 

STA  B 

TEII-B2 

03060  03C2  08 

INX 

03070  03C3  08 

INX 

03080  03C4  A7  00 

STA  A 

Q,X 

NOT  PULSE  A/D  FOR  CO? 

03090  03C6  01 

NOP 

OT  CHAIN  EL  2 

03100  03C7  A6  00 

LDA  A 

0,X 

03110  03C9  F6  01 

LDA  B 

1  ,x 

03120  03CB  R7  0394 

STA  A 

TR-1PA3 

03130  03CE  F7  0395 

STA  B 

TH1PB3 

03140  03D1  CE  0390 

IPX 

f, TEMPAL 

03150  03D4  A 6  00 

SAMEL]  rPA  A 

o,x 

03160  03D6  L6  01 

LDA  B 

1,X 

03170  03D8  47 

ASR  A 

NOT  SHIFT  2  BYTE  VLB 

03  1  80  03D9  56 

ROR  B 

4  POSITIONS  TO  UlC-r' 

03190  03 DA  47 

ASR  A 

12  BIT  TO  8  BIT  RUN 7 

03200  03DB  56 

ROR  B 

03210  03DC  47 

ASR  A 

03220  03DD  56 

ROR  B 

03230  03DE  47 

ASR  A 

03240  03DF  % 

ROR  B 

03250  03E0  F7  03 PI- 

STA  B 

SHFBUF 

SAVE  8  PIT  RES' ’I.'!’  OF 

03  260  03 E3  86  00 

IDA  A 

#0 

AND  ADI)  CARRY  OUT  ON 

?ed  mem 
o onv 


’  r  C  i 1 

: :  pro 
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C3270  03F5  B9  C3('F 
03280  03 F 8  36 

^ j j  6 .  —  *  u  t- 

03310  03FB  8C  0396 
03320  03 EE  26  E4 
03330  03F0  32 
03340  03 El  FE  0230 
03350  03F4  A7  02 
03360  03F6  FE  3494 
03370  03F9  B1  3497 


ADC  A  SHEBUF 
PSH  A 


si  ill':’  Rax  ding  up  or-  no.-:: 

SAVE  VI. U  IN  STACK  TLTGRA’ILY 


CPX 
BNE 
PUL  A 
LDX 
STA  A 
LDX 
CMP  A 


#TEHFA3+2  CHAMNEL  Z  ROUNDED  TO  8  BITS 
SAMPL1  NO.  GO  SAMPLE  NEXT  CHANNEL 
GET  Z  DATA 

BUFPTR  PICK  UP  CUR  MEM  FILE  PER 
2,X  SAVE  DATA  TO  MEN  F1T.E 

SAMPNO  GET  CUR  SAMPLE  COUNT 

MAX?.  IS  CUR  Z  RAX  OVE  SANPL.E  SET? 


03380 

03FC 

2F 

06 

BLE 

SPZMIN 

NO.  CO  CTIECK  TOR  N1N 

03390 

03FE 

B7 

3497 

STA  A 

MAXZ 

YES.  KEEP  CUP  VLU 

03400 

0401 

FF 

3493 

STX 

MAX  Z 1X3 

KEEP  CUR  SAl-'.PI ,F.  MCI 

03410 

0404 

B1 

34  9A 

SPZiMIN 

CMP  A 

KEZ 

IS  CUR  Z  MIN  OVER  SAMPLE  SET? 

03420 

0407 

2C 

06 

BGE 

SPYMAX 

NO.  CO  Q1ECK  FOR  Y  MAX 

03430 

0409 

B7 

349A 

STA  A 

MINZ 

YES.  KEEP  CUR  VLU 

03440 

040C 

FF 

349B 

STX 

MINZIjO 

KEEP  CUR  SAMPLE  MINI 

03450 

040F 

32 

SPYMAX 

PUL  A 

GET  Q!R  Y  DATA 

03460 

0410 

FE 

0230 

LDX 

BUFFER 

PICK  UP  CURRi  NT  MEM  FILE  PTR 

03470 

0413 

A7 

01 

STA  A 

1,X 

SAVE  DATA  TO  MEM  FILE 

03480 

0415 

FE 

3494 

LDX 

SAMPNO 

GET  am  SAMPLE  COUCT 

03490 

0418  B1 

34  9D 

CMP  A 

MAXY 

IS  aiR  Y  MAX  OVER  SAMFLE  SET 

03500 

041B 

2F 

06 

BLE 

SPYMIN 

NO.  GO  CI’.LK  TOR  MIN 

03510 

041D 

B7 

349D 

STA  A 

MAXY 

YES.  KEEP  QIR  Y  VLU 

03520 

0420 

FF 

349E 

STX 

maxylo 

KEEP  CUR  SAMPLE  NUM 

03530 

0423 

B1 

3  4  A0 

SPIT!  IN 

CMP  A 

Mirjy 

IS  CUR  Y  MIN  0-T.R  SAMPLE  SET? 

03540 

0426 

2C 

06 

BGE 

spxmax 

NO.  CO  CHEK  FOR  X  MAX 

03550 

0428  B7 

3  4  A0 

STA  A 

MINY 

YES.  KEEP  CUR  Y  VLU 

03560 

042B 

FF 

34A1 

SIX 

MINYLO 

KEEP  QIR  SAMPLE  NUM 

03570 

042E 

32 

SPXMAX 

PUL  A 

GET  CUR  X  DATA 

03580 

042F 

FE 

0230 

LDX 

BUFPTR 

PICK  UP  CURRMIT  N1M  FILE  PTR 

03590 

0432 

A7 

00 

STA  A 

0,X 

1 

rj 

5 

O 

Cz3 

03600 

0434 

FE 

3494 

LDX 

SAMFIO 

GET  CUR  SAMPLE  COUNT 

03610 

0437 

B1 

34,33 

CMP  A 

MAXX 

is  am  x  max  own  simple  set? 

03620 

043A  2F 

06 

BLE 

SPXMIN 

MO.  CO  aiLCK  X  MIN 

03630 

043C 

B7 

3  4  A3 

STA  A 

MAXX 

YES.  KEEP  CUR  X  VLU 

03640 

043F 

FF 

34-A4 

STX 

MAXXLO 

KEEP  CUR  SAMPLE  \TU 

03650 

0442 

El 

34A6 

SPXMIN 

CMP  A 

MINX 

IS  am  X  MIN  OVER  SAMPLE  SET? 

03660 

0445 

2C 

06 

FGE 

UNDONE 

NO.  IX IT  I 'AX /MIN  UPDATE 

03670 

0447 

B7 

3  4A6 

STA  A 

MINX 

YES.  KEEP  CUR  X  VI. V. 

03680 

044A 

FF 

34A7 

STX 

MINXLO 

KEEP  am  SAMPLE  COUNT 

03690 

044D 

OC 

MMDONE 

CLC 

DONE  LITE  MAX  (3  MIMS.  NON 

03700 

044E 

86 

18 

IDA  A 

*24 

UPDATE  ACTUAL  DATA  PIT  STORED 

03710 

0450 

C6 

00 

LDA  B 

*0 

03720 

0452 

BB 

34AF 

ADD  A 

OTABIT+3 

03730 

0455 

R7 

3  4AP 

STA  A 

DTABIT+3 

03740 

0458 

86 

00 

LDA  A 

#0 

03750 

045A 

F9 

3  4  API 

ADC  B 

DTABIT-t-2 

03760 

045D 

F7 

34AE 

STA  B 

DrrABIri’+2 

03770 

0460 

C6 

00 

I  DA  B 

"0 

03780 

0462 

E’.9 

3  4 /AD 

ADC  A 

DTABIT+1 

03790 

0465 

B7 

3  4  AD 

STA  A 

ITAMIT+1 

03  800 

046  8 

F9 

34AC 

ADC  B 

r/l’ABJT 
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03810  04GB  B7  3  4 AC 

STA  B 

DTABIT 

03820  046E  86  0  8 

r  ■  •  i  ■  p'*  o  «'•-  r*o 

IDA  A 

48 

NOW  UIBATF  KBIT, TBIT, "BIT  OOU 

U>40  0-i7C  BB  34:32 

.••J  i)  A 

■'  i  :  i  <•  l . . .  s  .  - 1  . 

03850  0475  B7  34B2 

STA  A 

KBITS +2 

03860  047  8  B7  34B5 

STA  A 

YBITS+2 

03  87  0  0  47B  B7  34B8 

STA  A 

Z BITS +2 

03880  047E  86  0  0 

LDA  A 

#0 

03  890  0  4  80  F9  34B1 

ADC  B 

XBITS+1 

03900  0483  F7  34B1 

STA  B 

XBITS+1 

03910  0416  F7  3434 

STA  B 

YBITS+1 

03920  0489  F7  34B7 

STA  B 

ZBITS+1 

03930  048C  B9  34B0 

ADC  A 

XBI7S 

03940  040T  B7  34B0 

STA  A 

XB1TS 

03950  0492  B7  34B3 

STA  A 

YBITS 

03  96  0  0  4  95  B7  34B6 

STA  A 

ZBITS 

03970  0498  7F  34BB 

CLR 

TBITS+2 

03980  04 9B  7F  343A 

CLR 

TBITS +1 

03990  049E  7f  34B9 

CLR 

TBITS 

04000  04A1  34 

DES 

NOW  POINT  STACK  BACK  TO  DATA 

04010  04A2  34 

DES 

04020  04A3  34 

DES 

04030  04A4  32 

PUL  A 

GET  Z  DATA 

04040  04A5  CE  3A00 

IDX 

#ZPDFM 

04050  04A8  BD  04D2 

JSR 

PDFSTR 

UPDATE  Z  PDF  BIN  COUNTER 

04060  04AB  32 

PUL  A 

GET  Y  DATA 

04070  04AC  CE  3800 

LDX 

#YPDFM 

04080  04AF  BD  04D2 

JSR 

PDFSTR 

UPDATE  Y  PDF  BIN  CONTER 

04090  04B2  32 

PUL  A 

04100  04B3  CE  3600 

IDX 

#XPDFH 

04110  04P6  BD  04D2 

JSR 

PDFSTR 

04120  04B9  FE  0230 

IDX 

BUFPTR 

NCW  GET  &  update  MEM  BUFF  PTK 

04130  04BC  08 

INX 

04140  04BD  08 

INX 

04150  04BE  08 

INX 

04160  04BF  FF  0230 

SIX 

BUFPTR 

04170  04C2  BE  1C96 

IDS 

STKSAV 

RETRirV  ENTRY  STACK  POINTER 

04180  04C5  8C  7FFE 

CPX 

2S7FFK 

is  met;  buf  full? 

04190  04C8  26  03 

ENE 

SAMRTI 

NO.  RET  FRO!  NiTR  8  SAMPLE  AC 

04200  04CA  7F  0232 

CLR 

DONTS T 

YES.  RESET  ILL  HILL  FLAG 

04210  04CD  3B  SAMRTI 

RTI 

04220  * 

04230  04CE  0002  TEMPER 

lv-13 

2 

TEMP  WORKING  BUFFER 

04240  04D0  0002  TEMPST 

RMB 

2 

TEMP  STACK  SAVE  I/.i’Ei  R 

04250  * 

04260  04D2  BF  04D0  PDFSTR 

STS 

TEN PST 

SA VT  STACK  PUT 

04270  04D5  FF  04CE 

SIX 

TEMPPF 

PAVE  PDF  PTR 

04280  04D8  16 

TAB 

SAVE  INHIT  DATA  VLI 

04290  04D9  BB  04CF 

ADD  A 

TEMJW-M1 

NOW  CALCUIATF,  AT.-.j  «  ,  yr 

04300  04DC  B7  04CF 

STA  A 

TEMIBR+1 

IN  THE  PDF  MLU  BURR.  - 

04310  04DF  86  00 

IDA  A 

#0 

04320  04 El  C5  80 

BIT  B 

#$P0 

IS  THE  DATA  VLU  NRG? 

04330  0413  2B  05 

DM  I 

PDFST1 

YES.  SRC  MSB  VS  ABC 

04340  04E5  B9  04CE 

/'DC  A 

TCll  DF 

NO.  ADD  WITH  CARRY  MSB 
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04350 

04760 

0  'i*j  t_ij 

043  SO 
04400 
04  410 
04420 
04430 
04440 
04450 
04460 
04470 
04480 
04490 
04500 
04510 
04520 
04530 
04540 
04550 
04560 
04570 
04580 
04590 
04600 
04610 
04620 


04E8  20  03 

04  FA  R2  04CE  PDFST1 


BRA 
SRC  A 


PDFST2 

TFMPDP 


AMD  STORE 
VLU  IS  MEG. 


SBC 


0  ■■  ' 
0  u 
04F1 
04F4 
04F7 


•7  04CE 

17 

BB  04CF 
B7  04CF 
86  0  0 
04F9  C5  80 
04FB  2B  05 
04FD  B9  04CE 
0500  20  03 
0502  B2 
0505  B7 
0508  FE 
050B  AE 
050D  31 
050E  AF 
0510  BE' 

0513  17 
0514  39 


04CE 

04CE 

04CE 

00 

00 

04D0 


PDFST3 

PDFST4 


5  Lv  \ 

i.i.LV" \7 ....  ,D  /; , 

ADD  A 

TEMPDF+1 

FOR  PROPER  ADDR  CALCUIATIOM 

STA  A 

TEMPDP+1 

LDA  A 

#0 

BIT  B 

#$80 

IS  THE  DATA  NEG? 

BMI 

PDFST3 

YES.  SBC  MSB  VS  ADC 

ax:  A 

TEN PDF 

NO.  ADD  WITH  CAJIRY  MSB  BYTE 

BRA 

PDFST4 

AND  STORE 

SBC  A 

TETPDF 

VLU  IS  MEG.  SUB  WITH  CAREY 

STA  A 

T EM PDF 

AID  STORE 

LDX 

TEMPDF 

NOW  LORD  CALC  ADDR  FOR  LNDEX 

LDS 

0,X 

GRAB  VLU  IN  CALC  ADDR 

INS 

INCREMENT  IT 

STS 

o,x 

AND  STORE  IT'  BACK  IN  BUFFER 

LDS 

TEKPST 

RECOVER  STAC!-:  POINTER 

TBA 

RECOVER  ORICIMAj  DATA 

RTS 

EXEC  JUMPS 

:  ACCUMULATORS 

* 

*FUNC: 


♦OUTPUTS:  NONE 
♦CALLS:  SAVEFL, FILLER 
♦DESTROYS:  X,A,RfCC 

♦PURPOSE:  TO  JUMP  TO  DESIRED  ROUTE; ES  VIA  RFJ.OC  ADDR 

•k 


(EKG-EXEC) 


VIA  ADDR  BUFFERS 


04630  0515  FE 

1CA3 

SAVEFL  LDX  SAVELC 

GET  ADDR  OF  SAVFFL 

04640  0518  6E 

00 

JMP  0,X 

JUMP  TO  SAVEFL 

04650 

* 

04660  051A  FE 

1CA1 

FILHDR  LDX  FILHLC 

GET  ADDR  OF  FT.LELC 

04670  051D  6E 

00 

JMP  0,X 

JUMP  TO  SAVEFL 

04680 

k 

04690 

kkkkkkkkkkkkkkkkkkkkkkkkk kkkkkkk kkkkkkkkkkkkk+kkkk 

04700 

*  END  SAMPLE 

04710 

kkkkkkk  kkkkkkk  kkkkkk  kkkkkkkkkkkkkkkkkkkkkkkkkkkk'k-k 

04720 

k 

04730 

* 

04740 

♦FUNCTION  : CAL  TNT 

04750 

♦INPUTS  (REG)  :NCME 

04760 

♦OUTPUTS  (REG)  : NONE 

04770 

♦CALIS  :  NOTHING 

047  80 

♦DESTROYS  (PR!)  :”OUF 

(INTERRUPT  HANDLER) 

04790 

♦PURPOSE  :THIS  RCUTTN 

E  IE  USID  FOP,  CALIIM-ATE  <1 

0  4  800 

*  THE  MAX  NUMBER  OF  1, 

C/CPS  POSSIBLE 

04810 

*  DURING  AM  IKT’TOlUi'i' 

PUMIC'D.  THIS 

0  4  820 

*  ROUTTOE  UPDATES  THE 

IXCTiWT  Fl  /G  AMD 

04830 

*  RESETS  THE  ETC  POO  I NT  FLIP  FLOP  & 

04840 

*  THE  RETURNS. 

0  4  850 

k 

04  86  0  0  5] F  7C 

0232 

GMJNT  INC  DCMTST 

ECCRIM'NT  DONE  TT ST  i  i,TO 

04870  0522  B7 

F400 

ST’A  A  ADC7!’.0 

(1,1!  ETC. 800  1NTM  FLIP  M 

04880  0525  01 

NOP 
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04 BOO  0526  3B 
04rr’0 


04930 
04940 
04950 
04  960 
0  4  970 
04980 
04990 
05000 
05010 
05020 


*********************  *******  A  *  *  *  *  *  *  Vi  >.  *  A  ^  *  i  f  i  A  *  *. 

*  end  count 

*************************************  *****  ***  *  **** 


************************************************** 
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*  VERSION 
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*  VERSION 
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■k'kkkk-kkk'kk'kkk-kk'kk'k'k-kk'kkkk'k’kkickkkkkkkkkk'kk’k-kkkkkkick 

00110 

k 

00120 

*  OVERLAY 

DESCRIPTION 

00130 

k 

00140 

*  THIS  OVERLAY  SAMPLES  HIE  EKG  DATA  VIA  THE 

00150 

*  A/D  CONVERTERS,  RCU 

EDS  THE  DATA  TO  8  BITS,, 

00160 

*  AND  THEN 

COMPRESSES 

TIE  DATA  VIA  '!1T  TCI  .A.' -A 

00170 
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00180 
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00190 

k 

00200 

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 
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k 

00220 
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00230 
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00240 

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 

00250 

k 

00260 

0100 
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$0100 

OVERIAY  START  ADDRESS 

00270 

* 

002F« 

OPT 

O 

AS  SB  OPT-C-EN  Ol\J  FILE 

00290 

OFT 

NOG 

AS SB  OFT-SUPPRESS  FULL  FCC  LI 

00300 

* 

00310 

kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 

00320 

k 

00330 

*  LADLE  DECLARATIONS 

00340 

* 

00350 

*  SUPPORT  SUBROUTINE  ADDRESSES 

00360 

★ 

00370 

CA87 

OUTPUT  EQU 

$CA87 

EPRCMDOS.  ALPH  STRING  TO  CONS 

00380 

CA8F 

OUTNCR  EQU 

$CA8F 

EPRCGDOS.  ALP!!  STRING, MO  CPJ.E 

00390 

CA2C 

KEYED  EQU 

8CA2C 

EPRCGDOS.  CONSOLE  T'.T'ST  FONT 

00400 

CA36 

KEYEOO  EQU 

8CA36 

EPRCGDOS.  CONSOLE  INPUT.  NO  ? 

00410 

1D00 

START  EQU 

$1D00 

EKG- EXEC.  FILE  CREATE  ROUTINE 

00420 

* 

00430 

*  DATA  BUFFERS 

00440 

* 

00450 

3400 

IIDRSTR  EQU 

$3400 

DIiTA  MEMORY  PUFFER  H FIXER 

00460 

FFF8 

TPQVEC  EQU 

SFFF8 

INTER- 1!  PI’  VECTOR  ADi'R 

00470 

1C96 

STKSAV  EQU 

S1C95 

ST.NCK  SAVE  BUFFER 

0048a 

1C98 

CPRTYP  LQU 

$1C9C 

COMPRESSION  A  CTO  19, AG 

00490 

3002 

ENDBLF  EQU 

$3002 

AD DR  OF  LAST  CHAR  IN;  IT 

00500 

1C9D 

VLX'SAV  FQU 

$1C9D 

IRO  VECTOR  SAVE  !:!'!  !'!  !’ 

00510 

1CA1 

F  I  LliliC  LTi’J 

$1CA1 

FU.Hi'R  ADDi-:  LANS  i'!  i  >  '1  !K 

00520 

1CA3 

SAVELC  FQU 

61CA3 

SATOFL  ;XL!<  P/VS  19  9'!':  '■ 

00530 

3  4  90 

IOOPCT  FQU 

$3490 

TOTAL  MINI  TINN  U.iOP  FNFC'D 

00540 

3494 

SAMIHO  FQU 

83494 

ni’Mf.f.r  oi’  sam;l:s  takg: 

00550 

3496 

lpcal  ir;u 

834% 

AVG ' D  MAX  I/O?  a.XP.T.  INTO 

00560 

34  97 

.’■Vixz  iqu 

83497 

MAX  VLU  IN  Qi  7, 
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3498 

MAXZLO  EOU 

83498 

MAX  VLU  ICC  IX  C!I  Z 

oo  r-n 

349A 

MIliZ  EQU 

$34  9A 

MIN  VI. U  IN  CH  V 

{  . 

j‘: 

r?i*:zi.o  ’ 

C;  :  .*  C,  > 

:xx  dc  :::  cn  z 

1'  ■  . 

34:0 

j  V 

Sj -A.) 

; .  c;  v 

00010 

349E 

MAXYLw  EQU 

8349E 

MAX  VI  I’  IOC  IN  CH  Y 

00620 

34A0 

MINY  EQU 

$3  4  A0 

MIN  VLU  IN  CII  Y 

00630 

34A1 

MINYLO  EQU 

834A1 

MIN  VLU  LCC  IX  CH  Y 

00640 

3  4  A3 

MAXX  EQU 

83  4 A3 

MAX  VLU  IN  CH  X 

00650 

34A4 

KiAXXLO  EQU 

834A4 

MAX  '  T.UE  ICC  IN  CH  X 

00660 

34A6 

MINX  EQU 

834A6 

MIN  VIA  IN  a I  X 

00670 

34A7 

MINXLO  EQU 

S34A7 

MIN  VLU  IOC  IN  CH  X 

006  eo 

3  4  AC 

OT7\BIT  EQU 

83  4 AC 

MUM  OF  BITS  USED  TO  STD  DA 

00690 

34B0 

XBITS  EQU 

834B0 

MUM  OF  BITS  USED  TO  SIR  X 

00700 

34B3 

YBITS  EQU 

S34B3 

NUI1  OF  BITS  USED  UO  STR  Y 

00710 

34B6 

ZBITS  EQU 

834B6 

NUM  OF  BITS  US'D  TO  STR  Z 

00720 

34B9 

TBITS  EQU 

834B9 

NUN  OF  BTTS  USED  TO  STD.  T 

00730 

34BC 

ACELCT  EQU 

834BC 

*  BITS  FED  TO  VAR  LEM  CODE 

00740 

3600 

XPDFM  EQU 

$3600 

0  VLU  ICC  OF  X  FDF 

007  50 

3800 

YPDFM  EQU 

$3800 

0  VLU  DC  OF  Y  FDF 

00760 

3A00 

ZPDFM  EQU 

83A00 

0  VLU  IOC  OE'  z  ros 

00770 

3  BOO 

TPDF  EQU 

83  BOO 

0  VAL  ICC  OF  TIME  VAR  HIST 

00780 

3C00 

SECZRO  EQU 

83C00 

DATA  STOIEE  ADDH  START 

00790 

* 

00800 

*  HARDWARE  ADDRESSES 

00810 

★ 

00820 

E400 

ADCZRO  EQU 

8E400 

AFC  CHANNEL  ZERO 

0  0  830 

E404 

ADCIVIO  EQU 

8E404 

ADC  G!/\NNRL  TWO 

00840 

E500 

DACZRO  EQU 

8E500 

DAC  CHANNEL  ZERO 

00850 

* 

00860 

* 

00870 

*FUNCTION  :TOLAN-A 

00880 

* INPUTS  : STATUS  BUFFERS  FROM  EKG-EXEC 

00890 

*OUTPUTS  :DATA  TQ  DISK 

00900 

*CALLS  :  OUTPUrr,  FIT.!  iDR , 

KEYED,  aiTI  ICR 

00910 

*  KEYBDO ,  SAVEI 

?T  Cn-i'iDTI 

ijf 

00920 

^DESTROYS  :ALL  RMGISTFJ 

PS 

00930 

*PURIQSE  :TO  COLLECT  3 

channels  of  ekg 

00940 

*  DATA  AND  STORE;  INTO  ! 

•I!  TORY. 

00950 

★ 

00960 

* 

00970  0100 

OF 

TOLANA  SEI 

00980  0101 

CE  0252 

IDX 

ISTRMSG 

00990  0104 

PD  CA8F 

JSR 

CUTNCR 

"THIS  XOD’IIF  SAMPLES  TXE... 

01000  0107 

ED  G\2C 

JSR 

KEVPD 

GET  REGIONS!:  FROM  CONSOLE 

01010  010A 

FE  3002 

LDX 

FNDI'UF 

01020  010D 

09 

DEX 

01030  010E 

E6  00 

IDA  B 

0,X 

01040  0110 

Cl  59 

aip  b 

*•  Y 

IS  INPUT  YES? 

01050  0112 

27  03 

BEQ 

TOIAN] 

YES.  KEEP  EXECUT IX'G  THIS  5<C1 

01060  0114 

7E  1D00 

JMP 

START 

NO.  RTN  TO  i  XG-EXEC 

01070  01  1 7 

CF  5441 

TOLA.N1  IDX 

-85441 

flag  coxeuirse  x  type  (ta) 

01080  01 1 A 

FF  1C98 

STX 

CFIHYP 

01090  onn 

!’,!)  023 II 

JSR 

FILHDR 

SET  UP  DATA  FILE  HEADER 

01100  0120 

CE  02D9 

IDX 
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177 


TO 


OHIO 

0123 

BD 

CAoF 

JSR 

OOTKCR 

"IN SIT’D  SLTC EC"  AND  fUC.. 

11 

01120 

01  26 

BD  CA36 

JSR 

KEYPD0 

Cl 
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r’lT.ULJZ:  :’..U  PE: 
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Oil-  , 
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FF 

024E 

4  r  * 

BDT’PTK 

s  x.n  r  i ; : : :  u  u  .  . 

01150 

012F 

86 

04 

LDA 

A 

#4 

pick  up  counter  for  time 

CAL 

0116C 

0131 

B7 

0245 

STA  A 

CALCNT 

STORE  IN  BUFFER 

01170 

0134 

86 

80 

IDA 

A 

#$80 

INITIALIZE  BIT  POINTER  TO 

LEF 

01180 

0136 

B7 

03C7 

STA 

A 

BITPTR 

01190 

0139 

4F 

CLR 

A 

IN IT  COMPRESS  VAR 

01200 

013A  B7 

0251 

STA 

A 
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01210 

013D 

R7 

03BC 
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XSLOPE 
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0140 

B7 

03BD 
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YSLOPE 
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B7 

03BE 
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Z SLOPE 

01240 
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FE 
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LDX 

IRQVEC 
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FF 
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STX 
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CE 
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STX 

IRQVEC 
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00 

LDA 
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#0 
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LOO 
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0154 

B7 

0250 
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DOM ’1ST 

STORE  IN  DOXTST  BUFFER 

01300 

0157 

CE 
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LDX 

#0 

CLEAR  LOOP  COUNTER 

01310 

01 5A  FF 

024A 

STX 

IRQCNT 
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01 5D  FF 

024C 

STX 

IRQCNT+2 

01330 
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FF 
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SIX 

DACZRO 
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01350  * 
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0F400  ************************************************** 
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01 
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01430 
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01 

NOP 
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01440 
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01 

NOP 
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01450 

0168 

01 

NOP 

OF  THE  liOOP  COUNTER 

01460 

0169 

01 

NOP 

WHIN  COUNT  CARRIES  TO 

01470 

016A  Cl 

NOP 
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01480 

01613 

7E 

0181 

JMP 

SP0O3 

JUMP  TO  CONTINUE  LOO? 

01490 

016E 
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CLT 
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016F 
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0170 
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STX 
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FE 
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LDX 

IRQOIT 
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017D 
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FF 
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STX 

IROaJT 

SAVE  cou:t 
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"A 

01690 

0188 

OF 

SEI 

PREVENT  SER  TO  MORE  INTR 

01700 

0189 

CE 

4000 

LDX 

#S4000 

PICK  UP  INTR  OFF  WORD 

01710 

01 OC 

FF 

E500 

STX 

DACZRO 

DISAJ3LE  EITR  PROM  TI."_ER 

01720 

018F 

B7 

E400 

STA  A 

ADCZRO 

CLR  ST'6  800  HIT  FLIP  FLOP 

01730 

01S'2 

01 

NOP 

01740 

0193 

7A 

0245 

DEC 

CALGIT 

DEC  TIME  CAL  LOOP  COUNTER 

01750 

01% 

27 

4F 

BEQ 

SPDONE 

IS  COUNT  3?  YES,  GO  SAVE  DATA 

01760 

0198 

B6 

0245 

LDA  A 

CALGIT 

NO.  GET  COUNT 

01770 

01 9E 

81 

03 

CMP  A 

#3 

IS  COUNT  3? 

01780 

01 9D 

26 

25 

BNE 

MAINSP 

NO.  CO  TO  MAIN  SPL  LOOP 

01790 

01 9F 

FE 

024C 

LDX 

IRQaiT+2 

YES.  SAVE  TIME  LOOP  COUNTER 

01800 

01A2 

FF 

0248 

STX 

GALONE 

01810 

01A5 

CE 

03C8 

LDX 

"SAMPLE 

NOW  PUT  SAMPLE  ADDR  IN  IRQVEC 

01820 

01A8 

FF 

FFF8 

STX 

IRQVEC 

01  83  0  01715  86  00  LDA  A  #80  SET  UP  DONTST 


01840 

01AD 

B7 

0250 

STA  A 

DONTST 

01850 

01  DO 

7F 

0251 

CLR 

FIRST 

RESET  FIRST  SMP  FLG 

01860 

01B3 

CE 

0000 

LDX 

#0 

CLR  LOOP  COUNT  AND  SAMPLE  CCXJ 

01870 

01 P6 

FF 

02 -A 

STX 

IRQCNT 

01880 

01D9 

FF 

024C 

STX 

IRQG1T+2 

01890 

01BC 

FF 

3494 

STX 

SAMH30 

01900 

01DF 

FF 

E5C0 

STX 

DACZRO 

ENABLE  TIMER  INTERRUPTS 

01910 

01C2 

20 

AA 

BPA 

SPOOl 

GO  WAIT  TOR  INT'EIcRi L'T 

01920 

01C4 

81 

02 

MAINSP 

CMP 

A 

i.‘2 

IS  COUNT  2? 

01930 

01C6 

26 

10 

BNE 

PARSAV 

MO.  SAVE  rPOPA’HTER  FROM  EKG 

01940 

01C8 

86 

55 

LDA 

A 

#$55 

SET  FIRST  HAG 

01950 

01CA 

B7 

0251 

STA 

A 

FIRST 

01960 

01CD 

B7 

0250 

STA 

A 

EO'ITST 

SET  DONTST  TOR  SMPL  COT, LEG 

01970 

01D0  CE 

0000 

LDX 

#0 

ENABLE  INTR  CLOCK 

01980 

01D3 

FF 

E5C0 

STX 

DACZRO 

01990 

01D6 

20 

% 

ERA 

SPOOl 

GO  WAIT  FOR  INTERRUPT 

02000 

01D8 

FE 

024A 

PARSAV 

LDX 

IRQG1T 

salt  i/x)p  count 

02010 

01DI5 

FF 

3490 

STX 

LOOPCT 

02020 

01DE 

FE 

02  AC 

LDX 

iroc;t+2 

02030 

01L1 

FF 

3492 

STX 

LOOPC.P+2 

02040 

OlEl 

7E 

01VC 

JMP 

TTMCAL 

GO  EXECUTE  ANOTHER  TIME  CAL 

02050 

01L7 

R6 

0249 

SPDCilE 

LDA 

A 

CALa;r,+i 

AVERAGE  TWO  TIME  GM,  PUNS 

02060 

01CA  BB 

02  AD 

ADD 

A 

IP.0cte-i3 

FDD  ]  r',Z  IWYInS 

02070 

01  ED 

157 

02A7 

STA 

A 

CALZFO+l 

STONE  IN  rULFFR 

020  80 

01 F0 

156 

02A8 

IDA 

A 

CALONE 

PICK  UP  MSB  OF  FI: 'S'- 

02090 

01F3 

B9 

024C 

ADC 

A 

:nocj'’’+2 

ADD  WITH  CARRY 

02100 

01F6 

B7 

0246 

STA 

A 

on  7  no 

STORK  IN  LU!  T:  R 

02110 

01F9 

77 

02% 

ASR 

CALZLO 

DIVIDE  BY  2  TO  A\  I  .  /'•  ! 

021  20 

one 

76 

C2‘7 

ROR 

CALZP.O+1 

02130 

01FF 

86 

0  s’ 

IDA 

A 

«8 

SFT  UP  COt  9  TER.  FOR  T'TO 

02140 

0201 

77 

0246 

GAT, SHF 

/\c;o 

CALZLO 

now  divid:  by  go  m 

02150 

0204 

76 

0247 

ROR 

CALZP.O+1 

r  nous/  tin':  ;i:;r;T 

02160 

0207 

4  A 

DEC 

A 

02170 

0208 

26 

F7 

pat; 

CAIiSHF 
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02180 

020A 

f;6 

0247 

IDA 

A 

CAIN  LOU 

PICK  UP'  SlillTND  ■’  T  V 
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021 '*0 

02 CD  R7  3456 

STA  A 

LEGAL 

FLORE  IN  FjI  E  EG:  PE;  -TV. 

O'"-  0  i-n 

JSR 

DTAG  IT 

m-'  (rv'T*)'  -  C\-  n.vTy\  1  ’ps 

GTC2G 

U216  OF  FI  FS 

Si  A 

i.  ,y.TC 

02230 

0219  CE  0336 

LDX 

IfSAVUSG 

02240 

021C  BD  CA8F 

JSR 

ot ttncr 

"SAMPLING  OOMH.ETK.  . .  " 

02250 

021F  BD  G\2C 

JSR 

KEYED 

GF.T  SAVE  DLC1EICN 

02260 

0222  FE  3002 

LDX 

ENDBUF 

02270 

0225  09 

DEX 

02230 

0226  E6  00 

LDA  B 

0,X 

02290 

0228  Cl  59 

CMP  B 

#*Y 

IS  DECISION  YES? 

02300 

022A  26  OC 

BNE 

EXJMP 

no.  rtc  to  erg- exec 

023  1  0 

022C  BD  0240 

JSR 

SAVEFL 

YES.  SAVE  THE  FILE  Otl  DISK 

023  20 

0221'  CE  03A4 

LDX 

*SDONE 

02330 

0232  BD  GY  OF 

JSR 

CUTNCR 

02340 

0235  BD  CA2C 

JSR 

KEYED 

02350 

023  8  7E  1D00 

EXJMP  JMP 

START 

JUMP  BACK  TO  LKG-EXEC 

0236  0 

* 

02370 

*FUNC:  RELOC  JUMP 

02380 

*  IN  PU'IS :  A 

02390 

♦OUTPUTS:  NONE 

02400 

♦CALLS:  FILHC 

■R ,  SAVEFL 

( EKG-EXEC  ROUTINES) 

02410 

♦DESTROYS :  A, 

B,CC,X 

02420 

♦PURPOSE  :  THIS  POL TEE  CABLES  TO LAN -A  TO  PE  RFjOCA 

02430 

♦without  lorry  of  changing  galls  to  fug-exec. 

02440 

★ 

02450 

023E  FE  1CA1 

FII.HDR  LDX 

FILHLC 

GET  FI  LI  DIR  ADDRESS 

02460 

023 E  6E  00 

JMP 

0,X 

JUMP  TC  IT 

0  2  470 

★ 

02480 

0240  FE  1GY3 

SAVEFL  LDX 

SAVEJjC 

GET  SAVLFL  ADDRESS 

02490 

0243  6E  00 

JMP 

0,X 

JUMP  TO  IT 

02500 

k 

02510 

0245  0001 

GYLCNT  PUB 

1 

TEST  CAIj  LOOP  COUNTER 

02520 

0246  0002 

GYLZRO  pmb 

2 

AVG'D  CAL  UXjPS  DURING  DAT  CO 

02530 

0248  0002 

CALC  UP  PAR 

2 

TEMP  BUF  DOR  PP.E  (GLLIG  CAL 

02540 

024A  0004 

IKOGIT  PUB 

4 

TRIP  INTO.  lOOP  COUNTER 

02550 

024E  0002 

EUFITR  RMB 

2 

BUFFER  POINTER  (G’  'TXT  AVATI. 

02560 

0250  0001 

DCNTST  RMB 

1 

DOME  TEST  V LG  FOR  MEN  FI’LE 

02570 

0251  0001 

FIRST  RMB 

1 

FIRST  A/D  SAMFL  FIG 

02580 

* 

02590 

0252  1A07 

STRMSG  FDD 

$1A07 

02600 

0254  54 

FGC 

/Tins  moduli:  sauplls  tlf  leg  / 

02610 

0270  49 

FCC 

/INPUT  K 

ID  STORES  TEE  DATA  / 

026  20 

028A  ODOA 

FDB 

S0D0A 

02630 

028C  43 

FGC 

/COMPEFS.- 

t:d  via  avjor  tot  .an-;./ 

02640 

02A9  ODOA 

FDB 

$0D0A,?0D0A 

02650 

02AD  44 

FCC 

/DO  YOU  I 

;iSi?  TO  EXECUTE  ONE 

02660 

02C9  4D 

FCC 

/MODULE  1 

;y  or  m)  / 

02670 

02D8  04 

FCB 

4 

026  80 

02.D9  1A 

IROMSG  FTP. 

$1A 

02690 

02DA  49 

FGC 

/INSURE  f 

<1  T\i ECT  AND  EKC  ’UYIC' 

02700 

021' 8  52 

FGG 

/READY!/ 

02710 

02FE  ODOA 

FDB 

$ODOA,80FOArSrnnA 

02720 

0304  50 

FGC 

/PUiSS  HI 

N!  ;-'N,  TV. Ell  CLOSE.  iNTiTTO:’:’/ 

IPO 


027  j*  0  032.6  20 

IOC 

/  OFT 

;ip  F*.  ITV’ii ./ 

027 -’0  0333  04 

FOR 

4 

i;r.7 

SAGGO  I  7i 

e  i  >  r,~> 

023  CU  033 1  53 

R’C 

/  SR  . 

.in-  <  .  o  '  -..  m -5, . 

02770  0357  .j 

FCC 

/INTER 

REIT  ENABLE  SNITCH./ 

027  80  0  36  F  0D0A 

FDD 

S0D0A, 

?0D0A, SODOA 

027 SO  0375  44 

FCC 

/DO  YOU  WISH  TO  SAVE  Hi  IS  DATA 

02800  0396  44 

FCC 

/DISK 

(Y  OR  N) / 

02810  03A3  04 

FCB 

4 

02820  03A4  20 

SDONE  FCC 

/  PRESS  RETURN/ 

02830  03B1  04 

FCB 

4 

02840 

* 

02850 

* 

02860 

*  END  TOLAN- 

A 

02870 

* 

02880 

* 

02890 

^FUNCTION  : SAMPLE 

02900 

*  IN  PIUS  :  STA 

TUS  PITITRS 

02910 

*OUTPUTS  :CC 

1 1:"7L  USED 

,  FOUNDED  DATA  DC  OEM  BIT. 

02920 

*CALLS  .-NOT1: 

.G 

02930 

*  PURPOSE  :THIS  ROUTE 

\F  SAMPLES  THE  EKG  LEADS 

02940 

*  ROUNDS  'IRE 

VALUES  1 

10  8  BITS  U-RCn  12) 

02950 

*  CALCULATES 

OAT,  MIN 

OF  BITS,  SAMPLES 

0  2  960 

*  ETC.,  AND  : 

SAVES  TV  I 

■:SF  PAIIAM  AND  DATA 

02970 

*  TO  DATA  ME! 

:-i  FILE. 

02980 

* 

02990 

k 

03000  0382  0001 

SHFBUF  RUB 

1 

TEMP  SHIFT  PUFFER 

03030  03F3  0001 

TFMPA1  JNB 

1 

TEMP  REG,  MSB  G!  0 

03020  03154  C001 

Tiv‘FT-1  ns 

1 

TEMP  REG,  LSB  CH  0 

03030  037.5  0001 

tf;ta2  rob 

1 

TEMP  REG,  MSB  CH  1 

03040  037,5  0001 

ViTITQ  fob 

1 

TEMP  REG,  LSB  G!  1 

03050  0377  0001 

TIN  PAG  POE 

1 

TC-iP  RIG,  MSB  GI  2 

030G0  037.8  0001 

TNI  TV-3  FIS 

1 

TEMP  REG,  LSB  G:  2 

03070  0379  0001 

XD-YTA  ROB 

1 

TC-IP  X  CH  DTA  BIT 

03080  03 PA  0001 

YDrVTA  K1B 

1 

TEMP  Y  CH  DTA  RTF 

03090  032R  0001 

ZDATA  FIT, 

1 

TEMP  Z  G I  DTA  RTF 

03100  031 ’.C  0001 

XSLOPC  RXR 

1 

1ST  DIFF  X (N) -X (N+l) 

03110  0371)  0001 

YSLO’L  777 

1 

1ST  DIFF  Y(N)~Y(N+1) 

03120  037,1-  0001 

zsr.cPE 

1 

1ST  DIFF  Z (N) -/ (N+l ) 

03130  03 IT  C0C4 

XFR?  PTC 

1 

NXPFCiTI.)  VAL  Oi-'  X  C+] ) 

03140  03C0  onoi 

YKXP  R'-'B 

1 

EXPECTED  VAL  (F  Y(FO) 

03150  03C1  0001 

zr:  :r  fob 

] 

EXPECTED  VAL  OF  I'C.  I } 

03] 60  03C2  0001 

XACCFL  FIT 

1 

DIFF  X(K+1  {*0—1 )  l 

03170  03C3  0001 

YACCEIj  its 

1 

DIFF  Y  (N+l)  -EC.  (N  O  I 

03180  03C4  0001 

ZACCFL  IGR 

1 

DIFF  7,(0+] )  -  FC  ■’  -  ■  ' 

03190  03C5  0001 

ST- FIO  I  FF 

1 

i  haw;  just  m:  n,  n  • 

03200  03C6  000] 

i  err  fit 

1 

TIME  CUT  VAR  (<127' 

032] 0  03C7  0001 

BITITR  ROB 

1 

BIT  POINTER  FOR  SO"  > 

03220 

k 

03230  03C8  F7  3494 

sample  i.n:< 

SAMFNO 

GET  aiR  SANG,  COUNT 

03240  03 OR  08 

I  MX 

03250  03CC  IT  3494 

FTX 

SAOPtlO 

03260  03CF  7F  1C90 

STS 

stksav 

SAVE  STACK  7RT 

ic 


03270  03D2  8F  3? 80 

"  mr] 

033(7"'  03m  ID  (CCS 
03310  03DD  F”  C24F 
03320  03F0  PC  03F9 
03330  03E3  A7  00 
03340  03E5  08 
03350  03 US  F6  03FA 
03360  03 F9  A7  GO 
03370  03FB  08 
03380  03 EC  P-6  03PB 
03390  03EF  A7  00 
03400  03F1  08 
03410  03F2  FF  024E 
03420  03F5  03  55 
03430  03F7  R7  03C5 
03440  03 FA  B7  0251 
03450  03FD  86  08 
03460  03FF  137  3  4  B2 
03470  0402  B7  34D5 
03480  0405  B7  34E’8 
03490  0408  7F  0250 
03500  04013  BE  1C5S 
03510  040E  3B 
03520  04 OF  7D  03C5 
03530  0412  27  05 
03540  0414  56  01 
03550  0416  17  C3C6 
03560  0419  B6  03F9 
03570  041 C  T’B  031 C 
03580  041F  B7  C3FF 
03590  0422  F6  03FA 
03600  0425  BB  03FD 
03610  0428  P.7  03C0 
03620  042B  V6  03F.B 
03630  042F  BB  03BE 
03640  0431  B7  03C1 
03650  0434  FD  05C3 
03660  0437  PB  03B9 
03670  043 A  BO  031 F 
03680  043D  B7  03C2 
03690  0440  26  03FA 
03700  0443  m  03 CO 
03710  0446  B7  03C3 
0372.0  044  9  F6  03FB 
03730  044C  BO  03C1 
03740  044F  B7  03C4 
03750  0452  PC  03C2 
03760  0455  26  21 
03770  0457  PC  03C3 
037  80  0  4  55.  26  1C 
03790  04 PC  P6  07C2 
03800  04  Pi  26  17 


LD8 

If  $3  2  80 

INITIALIZE  STACK  IK  FUSED  MIC 

!  J"  A 

IT!. 

cm  p 
SAXPLD 

cy  pi  r, 

JoR 

YLS.  DDL  i,  Wi  V. 

LDX 

BUPPTR 

NOW  STR  FIRST  DATA  VI.UES 

IDA  A 

XDATA 

STA  A 

0,X 

INK 

LDA  A 

YDATA 

STA  A 

0,X 

INX 

LDA  A 

ZDATA 

STA  A 

0,X 

rwx 

STX 

BUFPTR 

UPDAT’D  NEK  EUFI’TR 

LDA  A 

"  $55 

SET  STRFLG  &  FIRST  FLAG 

STA  A 

STRFLG 

STA  A 

FIRST 

LDA  A 

If  8 

UPDATE  X,Y,Z  BIT  CURS  FOR  IN 

STA  A 

KBITS -1-2 

STA  A 

YBITS+2 

STA  A 

ZBI7S+2 

CLP. 

DC  ITS? 

Q  P/R  IXiKTST  FLAG  FOR  1  SKID 

IDS 

STKSAV 

RTI 

COBPRS  TSm 

STRFLG 

VIE  DATA  JUST  BEEN  STORED  ? 

BEQ 

OOM.PR1 

EC.  KEEP  COD  PIT  :G  TEE 

IDA  A 

#1 

YES.  SET  TED  COUNT  TO  1 

STA  A 

ICTT 

OCMFRl  IDA  A 

xdata 

GET  X  VLU 

ADD  A 

XSI  OFF 

ADD  <'X(N-l)-X(N-2)  } 

STA  A 

XF.XP 

CRi  APE  EXPECTED  YAL  OF  X(N+1) 

IDA  A 

YDATA 

GET  LAST  Y  504 FL  VALUE 

ADD  A 

YSLOPE 

ADD  i(Y(2-l)-P<N-2)i 

STA  A 

YEXP 

CREATE  EXPECTED  VXL  CT’  Y(K+1) 

LDA  A 

ZDATA 

GET  LAST  Z  SKPL  YAJ.UF 

ADD  A 

ZSLOPK 

ADD  {(/{K-J  5-ZC-2)  i 

STA  A 

ZEXP 

CREATE  EXPECTED  VAT.-  C?  Z(N-tl) 

JSR 

SAMPL0 

NOG  GO  CF.T  'TEXT  SEEN.  N-X+l 

LDA  A 

XDATA 

CALC  DIF  X  (N)  -L{X  (N)  ■ 

SFB  A 

vrvp 

SPA  A 

XACCF.L 

C’A\T  TIT  p  *p'  V-.P 

IDA  A 

YDATA 

GU.C  DIF  YCD-L’IYCI)} 

STB  A 

Yl'Xp 

STA  A 

YACC'L 

05 .Vi '  DIF  I”  VAR 

LDA  A 

ZDATA 

C'J.C  DIF  pc-:)-;V  7(D)  ; 

SUB  A 

r7Xr,  r~t 
it »  ‘i  .1 

SPA  A 

ZACCFL 

SAVE  IMF  3 ‘I  VAR 

IDA  A 

XACCEL 

EXE 

CC-MFR2 

ART.  AJ.l.  I’XITLMTP'T  A'HOKS  GCTO? 

IDA  A 

Y5.CO.  :i , 

IF  NO,  X!  I F  •  TO  STk  ALL  DIFF'S 

BKK 

CTE;R\? 

IDA  A 

XACC!  :i . 

eke 

O.  {'Fi-:2 

1  82 


TOI  A\-  8 


C3c'10 

0461 

76 

03C6 

LDA 

A 

ICC 

UPDATE  FIE  TI.’P  (0750: 

0">  c'>0 

0-'O  4 

fir 

A 

.  l"'  '  > 

03 1.^0 

G-i67 

71 

vLCRTI  3 

YO.  a..:  -  .  F  -  FT  ..... 

03850 

0459 

R7 

03C6 

STA 

A 

io:t 

KO.  INC  I C  IT  fv  RTI 

0  3  860 

046C 

7F 

03C5 

CLR 

STRFLG 

RESET  I  HAVE  JUST  STRED  F 

03570 

046F 

86 

55 

LDA 

A 

#$55 

03880 

0471 

B7 

0250 

STA 

A 

racier 

KELP  DOME  TEST  SET 

03  690 

0474 

BE 

1C  56 

LDS 

STKSAV 

RETKIEV  STACK 

03900 

0477 

3B 

RTI 

03910 

★ 

03920 

047  8 

CE 

3  4  BO 

COM PR 2  IDX 

#X  BIT'S 

UPDATE  X  BIT  CUR 

03^30 

0  47  E 

B6 

03C2 

LDA 

A 

XACGFL 

03940 

047E 

BD 

056  8 

JSR 

BITOT 

03950 

0481 

CE 

3600 

LDX 

#XPDI'M 

UPDATE  CH  X  FREQ  OP  OCCUR 

03960 

0484 

E5 

03C2 

LDA 

A 

XACCEL 

03  970 

0487 

BD 

06  6  R 

JSR 

PDDSTR 

03980 

04  PA 

R6 

03C2 

LDA 

A 

XACCEL 

03990 

04  8D 

R6 

03C2 

LDA 

A 

XACCL'I . 

04000 

0490 

BB 

03  PC 

ADD 

A 

XSLCPE 

CALC  &  SPAT  X (7-1) -X (7-2) 

04010 

0493 

B7 

03  PC 

STA 

A 

XSLOPE 

04020 

0496 

CE 

34B3 

LDX 

#YB1TS 

UPDATE  Y  BIT  OTR 

04030 

0499 

B6 

03C3 

LDA 

A 

YACCEL 

04040 

049C 

BD 

056  8 

JSR 

BITOT 

04050 

04SF 

CS 

3  POO 

IDX 

#ypdf:i 

UPDATE  G1  Y  FREQ  OF  OCCUR 

04060 

0'V\2 

B6 

03C3 

LDA 

A 

YACCCL 

04070 

0445 

7D 

06  6  B 

JSR 

PDFSTR 

04080 

04A8 

B6 

03C3 

IDA 

A 

YACCET 

04090 

04ab 

R5 

03C3 

LDA 

A 

YACCEj, 

04100 

04AE 

BB 

03BD 

ADD  A 

YSLOPD 

CALC  &  SARD  Y(N-l)-Y(N-2) 

04110 

0471 

77 

037D 

STA 

A 

YFLOPL' 

04120 

0474 

Cl 

3  4B6 

IDX 

•tZBI/i’S 

UPDATE  Z  BIT’  OTP. 

04130 

04D7 

DO 

03C4 

LDA 

A 

Z  PC CEL 

04140 

047A  BD 

056  8 

JSR 

BITOT 

04150 

04PD  CE 

00 

IDX 

#7,  P'OFH 

UPDATE  Gi  Z  FREQ  OF'  OCCUR 

04160 

O^CO 

156 

05C4 

LDA 

A 

ZACCEL 

04170 

04C3 

PD 

06  6 B 

JSR 

PDFSTR 

04180 

04C6 

P6 

03C4 

LDA 

A 

ZACCEL 

04190 

04C9 

P6 

03C4 

LDA 

A 

ZACC1FI  i 

04200 

04CC 

PR 

03 1C 

ADD 

A 

Z SLOPE 

CALC  &  SAVE  Z (7-1) -7(7-2) 

04210 

04CT’ 

D7 

03  BE 

STA 

A 

Z SLOPE 

04220 

04D2 

CE 

34R9 

LDX 

cm  its 

NOW  UPDATE  TILE  BIT  CAR 

04230 

04D5 

fO 

06 

IDA 

A 

#6 

04240 

04D7 

BD 

056  P 

*»  cp 

C.'  k-  .  v 

PJ-IY-JT 

04250 

04PA 

76 

03C2 

Q"MIT3  IDA 

A 

XACCEL 

TICK  UP  XACCEL 

04260 

04DP 

BD 

OUR 

JSR 

COi  'STR 

(/>  a  TP  7  S’: OR’  IF 

04270 

04F0 

P6 

03G3 

IDA 

A 

Y7  CCEL 

PICK  UP  1  ACC T  \7 

04280 

04E3 

I'D 

05:  b 

JSR 

n  •  is  pr 

co  coke  sicxi:  uf 

04290 

0476 

70 

03C4 

IDA 

/  V 

ZACCEL 

PTCU  r.'  S'  "CF.  FF 

04300 

0479 

!'D 

7  51  B 

JFR 

CC-MSTR 

(-  )  O  FF  :  ■’iC  "  .  F 

04310 

041  C 

76 

03C6 

IDA 

A 

TOT 

70  Ci  7  IC  F  :  ■  "  : 

04320 

0411’ 

CE 

3700 

IDX 

v:ypv)y 

’ ' Fi'AC  'PDF'  RIF  F'  ■  "  F  . .  F  i 

04330 

04!' 2 

I'D 

rr,r>;> 

JSR 

PF'i'E  : . ' 

04340 

0475 

ID 

07  5 A 

JSR 

RFD7T 

r:  o  I*-  if.:-  c  :  f  e  ’  r 

1!G 


k 


AD-A100  799 

UNCLASSIFIED 


AIR  FORCE  INST  OF  TECH  WRIGHT-PATTERSON  AFB  OH  SCHOO— ETC  F/«  6/5 
ANALYSIS  AND  PERFORMANCE  EVALUATION  OF  ELECTROCARDIOGRAM  DATA  C— ETC(U) 
DEC  80  M  D  TOWNSEND 
AFIT/GE/EE/B0D-**6 


NL 


TOLA'.'- 8 


04350 

04F8  79 

03C6 

ROL 

ICNT 

ROL  7  BIT  ICNT  TO  MS  POSITION 

04360 

04FB  86 

08 

EDA  A 

#8 

SET  CNTER  FOR  TIME  STORE  LOOP 

04370 

04ED  4A 

COMFR4  DEC  A 

DECREITD1T  LOOP  CITE 

043  80 

04FE  27 

OF 

E  LjQ 

COMFR6 

TIME  STRED  YET? 

04390 

0500  79 

03C6 

ROL 

ICNT 

NO.  ROTATE  TIME  WORD  ONCE  LEF 

04400 

0503  25 

05 

BCS 

COMPR5 

1  IN  CARRY? 

04410 

0505  BD 

055A 

JSR 

RESET 

NO.  PUT  0  IN  MEM  FILE 

04420 

0508  20 

F3 

BRA 

OOMPR4 

04430 

050 A  BD 

0534 

COMPR5  JSR 

SET 

YES.  PUT  1  IN  MEM  FILE 

04440 

050D  20 

EE 

BRA 

OOMPR4 

04450 

050F  86 

55 

OOMPR6  LDA  A 

#555 

0  4460 

0511  B7 

03C5 

STA  A 

STRFLG 

NOW  SET  "I  HAVE  JUST  STORED" 

04470 

0514  B7 

0250 

STA  A 

DONTST 

SET  DONTST  FLAG 

04480 

0517  BE 

1C96 

LDS 

STKSAV 

04490 

051 A  3B 

RTI 

04500 

04510 

04520 

04530 

04540 

04550 

04560 

04570 

04580 

04590 

04600 

04610 

046  20 

04630 

04640 

04650 

04660 

04670 

04680 

04690 

047  0  0 

047  1  0 


051E  4D 
051F  2A  06 
0521  40 
0522  BD 
0525  20 
0527  BD 
052A  4D 
052B  27 
052D  BD 
0530  4A 
0531  20  F7 
053  3  3  9 


0534 

03 


06 

0534 


OOMSTR  JSR 

RESET 

PUT  0  IN  MEM  FILE  FOR  DELIM 

TST  A 

NOW  TEST  STATUS  OF  A 

BPL 

COMST1 

IS  IT  +? 

NEG  A 

NO.  GET  2'S  COMP  FOR  MAG 

JSR 

SET 

NO.  STORE  1  FOR  SIGN  BIT 

BRA 

COMST2 

COMST1  JSR 

RESET 

YES.  STORE  0  FOR  SIGN  BIT 

COMST2  TST  A 

NOW  CNT  DOWN  &  STORE  DATA 

BEQ 

COMST3 

CNT  0? 

JSR 

SET 

NO.  STORE  1  TO  MEM  FILE 

DEC  A 

DEC  CNTR 

BRA 

OOMST2 

GOMST3  RTS 

* 

* 

♦FUNC:  SET 

♦INPUTS:  BUFPTR, BITPTR 

♦OUTPUTS:  BIT 

SET  FT 'ED  TO  BY  ABOVE 

♦CALLS:  NOTHING 
♦DESTROYS:  B,X,CC 

♦PURPOSE:  THIS  ROUTINE  SETS  THE  BIT  POINTED  TO 

)  THEN  UPDATES  THESE  COUNTERS 


GET  CUR  MEM  WORD  FOR  DATA  STO 

GET  BIT  IN  THAT  WORD  TO  BE  SE 

SET  THE  BIT 

SAVE  IN  MEM  FILE 

CLR  CARRY  FOR  PROPER  LEFT  ROT 

ROLL  BITPTR  ONCE  P.IC.'T 

WAS  BITPTR  DOWN  TO  1ST  BIT? 

YES.  IN  BUFFTR  $  SET  BITPTR  T 


047  20 

*  BY 

BITPTR  & 

BUFPTR 

047  3  0 

* 

04740 

0534  FE 

024E 

SET 

LDX 

BUFPTR 

04750 

0537  F6 

03C7 

LDA  B 

BITPTR 

04760 

053 A  EA  00 

ORA  B 

0,X 

04770 

053C  E7 

00 

STA  B 

0,X 

04780 

053E  0C 

SET0 

CLC 

04790 

053F  76 

03C7 

ROR 

BITPTR 

04  800 

0542  24 

15 

BCC 

SETHIS 

04810 

0544  76 

03C7 

ROR 

BITPTR 

04  820 

0547  0  8 

INX 

04830 

0548  FF 

024E 

SIX 

BUFFTR 

04  840 

054B  F6 

024E 

LDA  B 

BUFPTR 

04  850 

054E  Cl 

80 

GMP  B 

#580 

04860 

0550  26 

07 

ENE 

SETRTS 

04870 

0552  7F 

0250 

CLR 

DONTST 

04880 

0555  BE  1C 96 

LDS 

STKSAV 

YES.  STOP  DATA  COLLEC  &  RTI 


184 


04890  C  358  3B 

04900  0559  39 

G-...  • 

04930 

04940 

04950 

04960 

04970 

04980 


RTI 

SETRTS  RTS 
* 

*fu?tc:  rrrriT 

* INPUTS :  BUFPTR, BITPTR 

♦OUTPUTS:  BIT  RESET  IN  HEM  FILE  PT' ED  TO  BY  ABOVE 
♦CALLS:  NOTHING 
♦DESTROYS:  B,X,CC 

♦PURPOSE:  THIS  ROUTINE  RESETS  THE  BIT  IN  THE  MEMFILE 
*  POINTED  TO  BY  BUFPTR  &  BITPTR  &  UPDATES  THESE  COUN 


04990 

* 

05000 

055A  FE 

024E  RESET 

LDX 

BUFPTR 

05010 

055D  F6 

03C7 

LDA  B 

BITPTR 

05020 

0560  53 

COM  B 

05030 

0561  E4 

00 

AND  B 

0,X 

RESET  BIT  IN  HEM  WORD 

05040 

0563  E7 

00 

STA  B 

0,X 

SAVE  BIT  IN  MEM  FILE 

05050 

056  5  7E 

053E 

JMP 

SET0 

UPDATE  CNTR'S  AND  CK  IF 

05060 

* 

05070 

♦FUNC: 

BITCNT 

05080 

05090 

05100 

05110 

05120 

05130 

05140 


♦INPUTS:  ACCEL  VLU  IN  A,  BIT  QJTR  IN  X 
♦OUTPUTS:  UPDATED  BIT  COUNT 
♦CALLS  :NOTHING 
♦DESTROYS:  A,  B,CC 

♦PURPOSE:  THIS  ROUTINE  INC  3  BYTE  BIT  COUNTER  WITH 
*  NUMBER  OF  BIT  USED  TO  STORE  X,Y,Z,&  TIME. 


05160 

056A  40 

NBG  A 

NO.  GET  ABS  VI, U 

05170 

056  B  4C 

BITCN1 

INC  A 

ADD  1  FOR  DELIM  0  BIT 

05180 

056C  4C 

INC  A 

ADD  1  FOR  SIGN  BIT 

05190 

056D  C6 

00 

LDA  B 

#0 

RESET  B  WITHOUT  AFFECTING  CAR 

05200 

056F  AB 

02 

ADD  A 

2,X 

INC  LSB  BYTE  OF  COUNT  FTED  TO 

05210 

0571  A7 

02 

STA  A 

2,X 

05220 

057  3  86 

00 

IDA  A 

#0 

05230 

0575  E9 

01 

ADC  B 

l»x 

05240 

0577  E7 

01 

STA  B 

1,X 

05250 

0579  C6 

08 

LDA  B 

#8 

NOW  UP  COUNT  OF  ACTUAL  DATA  B 

05260 

057B  A9 

00 

ADC  A 

0,X 

05270 

057D  A7 

00 

STA  A 

o,x 

05280 

057F  86 

00 

LDA  A 

#0 

05290 

0581  FB 

34BF 

ADD  B 

ACELCT+3 

NO.  INC  ACELCT  COUNT 

053  00 

0584  F7 

34BF 

STA  B 

ACELCT+3 

05310 

0587  C6 

00 

LDA  B 

#0 

05320 

0589  B9 

34BE 

ADC  A 

ACELCT+2 

053  3  0 

058C  B7 

34BE 

STA  A 

ACELCT+2 

053  40 

058F  86 

00 

LDA  A 

#0 

05350 

0591  F9 

34BD 

ADC  B 

ACELCT+1 

0536  0 

0594  F7 

34BD 

STA  B 

ACELCT+1 

0537  0 

0597  B9 

34BC 

ADC  A 

ACELCT 

05380 

059A  B7 

34BC 

STA  A 

ACELCT 

05390 

059D  39 

BITRTS 

RTS 

05400 

* 

05410 

♦FUNC: 

DTACNT 

05420 


♦INPUTS:  NUM  ON  SMPLS  COLLECTED 
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05430 

♦OUTPUTS:  BITCIT=TO  SNPLS*24 

054*0 

♦CALLS:  NOTHING 

or.'-:n 

♦DESTROYS :  A, 

,B,X,CC 

0546C 

♦PURPOSE:  TO 

CALC  NUII  OF  BITS  STORED  DURING  COLLECT 

0  5470 

* 

05480  059E  FE  3494  OTACNT  LDX 

SAMFNO 

05490  05A1  86  18 

DTACN1  LDA  A 

“24 

05500  05 A3  C6  00 

IDA  B 

#0 

05510  05A5  BB  34AF 

ADD  A 

DTABIT+3 

05520  05A8  B7  34AF 

STA  A 

DTABIT+3 

05530  05AB  86  00 

LDA  A 

#0 

05540  05AD  F9  34AE 

ADC  B 

DTABIT+2 

05550  05B0  F7  34AE 

STA  B 

DTABIT+2 

05560  05B3  C6  00 

LDA  B 

#0 

05570  05B5  B9  34AD 

ADC  A 

DTABIT+1 

05580  05B8  B7  34AD 

STA  A 

BTABIT+1 

05590  05BB  F9  34AC 

ADC  B 

DTABIT 

05600  05BE  F7  34AC 

STA  B 

DTABIT 

05610  05C1  09 

DEX 

05620  05C2  8C  0000 

CPX 

#0 

05630  05C5  26  DA 

BNE 

ETACN1 

05640  05C7  39 

RTS 

056  50 

★ 

0566  0 

♦FUNC:  SAKPLO 

0567  0 

♦INPUTS:  DATA  VIA  A/D  CONV 

05680 

♦OUTPUTS:  ROUNDED  DATA  TO  XDTA, YDTA, ZETA 

05690 

♦CALLS :PDFSTR 

(UPDATE  PDF  HISTOGRAMS) 

05700 

♦DESTROYS:  A,  B,X,CC 

05710 

♦PURPOSE:  THIS  ROUTINES  SAMITES  THE  A/D  AND  THEN 

057  20 

*  ROUNDS  THE  : 

DATA  TO  8  BITS  FRCf-1  12.  THE  DATA 

05730 

*  IS  PLACED  IN  XDTA,  YOTA,  ZETA  AND  THE  COLLEC 

05740 

*  STAT  ARE  UPDATED. 

057  50 

* 

05760  05C8  CE  E400 

SAMPLO  LDX 

#ADCZRO  NOT  PULSE  A/D  TO  START  CONV 

05770  05CB  A7  00 

STA  A 

0,X  ON  CHANNEL  0 

05780  0  5CD  01 

NOP 

05790  0  5CE  A6  00 

LDA  A 

o,x 

05800  05D0  E6  01 

IDA  B 

l,x 

05810  05D2  B7  03B3 

STA  A 

TEMPA1 

05820  05D5  F7  03B4 

STA  B 

TMFBl 

05830  05D8  08 

INX 

05840  05D9  08 

INX 

05850  05DA  A7  00 

STA  A 

0,X  NOT  PULSE  A/D  TO  CONV 

05860  05DC  01 

NOP 

ON  CHANNEL  1 

05870  05DD  A6  00 

LDA  A 

0,X 

05880  05DF  E6  01 

IDA  B 

lfX 

05890  05E1  B7  03B5 

STA  A 

TENPA2 

05900  05E4  F7  03B5 

STA  B 

TENFB2 

05910  05E7  08 

INX 

05920  05E8  08 

INX 

05930  05E9  A7  00 

STA  A 

0,X  NOT  FULSE  A/D  TO  CONV 

05940  05EB  01 

NOP 

ON  CH  2 

05950  05EC  A6  00 

LDA  A 

0,X 

05960  05EE  E6  01 

LDA  B 

1  rX 

TOLA';- 8 


C5970  05F0  B7  03E7 

STA  A 

TEMPA3 

05980  05F3  F7  03B8 

STA  B 

TEHFB3 

05990  0 5F6  CF  03P3 

IDX 

#TEMPA1 

06000  05F9  A6  00  SAf-iPLl  IDA  A 

0,X 

06010  05FB  E6  01 

IDA  B 

1,X 

06020  05FD  47 

ASR  A 

12  BIT  TO  8  BIT  ROUNDED  CONV 

06030  05FE  56 

ROR  B 

06040  05FF  47 

ASR  A 

06050  0600  56 

ROR  B 

06060  0601  47 

ASR  A 

06070  0602  56 

ROR  B 

06  080  0603  47 

ASR  A 

06090  0604  56 

ROR  B 

06100  0605  F7  03B2 

STA  B 

SHFBUF 

SAVE  8  BIT  RESULT  OF  SHIFT 

06110  0608  86  00 

IDA  A 

#0 

AND  ADD  CARRY  OUT  OF  LAST 

06120  06 0A  B9  03B2 

ADC  A 

SHFBUF 

SHIFT  ROUNDING  UP  OR  DOOM 

06130  06 OD  36 

PSH  A 

SAVE  TO  MEM  FILE  BUFFER  VIA  S 

06140  06 OE  08 

INX 

06150  06 OF  08 

INX 

06160  0610  8C  03B9 

CPX 

#TEMPA3+2  CHANNEL  Z  ROUNDED  TO  8  BITS 

06170  0613  26  E4 

BNE 

SAMPLl 

NO.  GO  SAMPLE  NEXT  CHANNEL 

06180  0615  32 

PUL  A 

GET  Z  DATA 

06190  0616  B7  03BB 

STA  A 

ZDATA 

06200  0619  FE  3494 

IDX 

SAMPNO 

GET  CUR  SAMPLE  COUNT 

06210  06 1C  B1  3497 

CMP  A 

MAXZ 

IS  CUR  Z  MAX  CVE  SAMPLE  SET? 

06220  06 IF  2F  06 

BLE 

SPZMIN 

NO.  GO  CHECK  FOR  MIN 

06230  0621  B7  3497 

STA  A 

MAXZ 

YES.  KEEP  CUR  VLU 

06240  0624  FF  3498 

STX 

MAXZLO 

KEEP  CUR  SAMPLE  NUM 

06  250  0627  B1  349A  SP7.MIN 

CMP  A 

MD7Z 

IS  CUR  Z  MIN  OVER  SAMPLE  SET? 

06260  062A  2C  06 

BGE 

SPYMAX 

NO.  GO  Q1ECK  FOR  Y  PAX 

06270  062C  B7  349A 

STA  A 

MINZ 

YES.  KEEP  CUR  VLU 

06280  062F  FF  34SB 

STX 

MINZLO 

KEEP  CUR  SAMPLE  NUM 

06290  0632  32  SPYMAX 

PUL  A 

GET  CUR  Y  DATA 

06300  0633  B7  03BA 

STA  A 

YDATA 

06310  0636  B1  349D 

CMP  A 

MAXY 

IS  CUR  Y  MAX  OVER  SAMPLE  SET 

06320  0639  2F  06 

BLE 

SFYMIN 

NO.  GO  CHEK  FOR  MIN 

06330  063B  B7  349D 

STA  A 

MAXY 

YES.  KEEP  CUR  Y  VLU 

06340  063E  FF  349E 

STX 

MAXYLO 

KEEP  CUR  SAMPLE  NUM 

06350  0641  B1  34A0  SFYMIN 

CMP  A 

MINY 

IS  CUR  Y  MIN  OVER  SAMPLE  SFT? 

06360  0644  2C  06 

BGE 

SPXI'lAX 

NO.  GO  CHEK  FOR  X  MAX 

06370  0646  B7  34A0 

STA  A 

MINY 

YES.  KEEP  CUR  Y  VLU 

06380  0649  FF  34A1 

STX 

MINYLO 

KEEP  CUR  SAMPLE  NUM 

06390  06 4C  32  SPXMAX 

PUL  A 

GET  CUR  X  DATA 

06400  06 4D  B7  03B9 

STA  A 

XDATA 

06410  0650  B1  34A3 

CMP  A 

MAXX 

IS  CUR  X  MAX  OVER  SAMPLE  SET? 

06420  0653  2F  06 

BLE 

SPXMIN 

NO.  GO  CHECK  X  MIN 

06430  0655  B7  34A3 

STA  A 

MAXX 

YES.  KEEP  CU?  X  VLU 

06440  0658  FF  34A4 

STX 

MAXXLO 

KEEP  a’R  SAMPLE  VLU 

06450  06 5B  B!  34A6  SFXMIN 

CMP  A 

MINX 

IS  am  X  MIN  OVER  sample  SET? 

0646  0  065E  2C  06 

BGE 

MMDONE 

NO.  EXIT  MAX, MIN  UFIP'PF. 

06470  0660  B7  34A6 

STA  A 

MINX 

YES.  KEEP  aiR  X  VIA; 

06480  0663  FF  34A7 

SIX 

MINXLO 

KEEP  CUR  SAMPLE  COUNT 

06490  0666  39  MMDONE 

06500  * 

RTS 
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06510 

0667  0002 

TENPDF 

RMB 

2 

TENP  WORKING  BETTER 

06520 

0669  0002 

TEN  PST 

RMB 

2 

TENP  STACK  SAIT  BUFFER 

06530 

* 

06540 

06  6 B  BF 

0669 

PDFSTR 

STS 

TEN  PST 

SAVE  STACK  PTR 

06550 

066E  FF 

0667 

STX 

TEMPDF 

SAVE  PDF  PTR 

06560 

0671  16 

TAB 

06570 

0672  BB  0668 

ADD  A 

TENPDF+1 

107  CALCULATE  ADDRESS  IN 

INC 

06  5  80 

0675  B7 

0668 

STA  A 

TEMEDF+1 

IN  TOE  PDF  MEM  BUFF 

06590 

0678  86 

00 

LDA  A 

#0 

06600 

067A  C5 

80 

BIT  B 

#$80 

IS  TIE  DATA  VLU  NEG 

06610 

067C  2B 

05 

BMI 

PDFSTl 

YES.  SBC  MSB  VS  ADC 

06620 

067 E  B9 

0667 

ADC  A 

TENPDF 

NO.  ADC  MSB 

06630 

0681  20 

03 

BRA 

PDFST2 

AND  STORE 

06640 

0683  B2 

0667 

PDFST1 

SBC  A 

TENPDF 

VLU  IS  NEG.  SBC 

06650 

06  86  B7 

0667 

PDFST2 

STA  A 

TEMFDF 

AND  STORE 

06660 

0689  17 

TEA 

RECOVER  VI, U  AND  ADD  (SUB) 

AGA 

06670 

06 8A  BB  0668 

ADD  A 

TEMFDF+1 

FOR  PROPER  ADDR  CALC 

066  80 

06  8D  B7 

0668 

STA  A 

TENPDF+1 

06690 

0690  86 

00 

LDA  A 

#0 

06700 

0692  C5 

80 

BIT  B 

#$80 

IS  VLU  NEG? 

06710 

0694  2B 

05 

BMI 

PDFST3 

YES.  SBC  MSB  VS  ADC  MSB 

06720 

06  96  B9 

0667 

ADC  A 

TENPDF 

NO.  ADC  MSB 

06730 

0699  20 

03 

BRA 

PDFST4 

06740 

06  9B  B2 

0667 

PDFST3 

SBC  A 

TEMPDF 

VLU  IS  NEG.  SBC 

06750 

06  9E  B7 

0667 

PDFST4 

STA  A 

TENFDF 

AND  STORE 

06760 

06A1  FE 

0667 

LDX 

TEMFDF 

NO  LOAD  CALC  ADDR  FOR  INDEX 

06770 

06A4  AE 

00 

LDS 

0,X 

GRAB  VLU  IN  CALC  ADDR 

06780 

06A6  31 

INS 

INC  IT 

06790 

06A7  AF 

00 

STS 

o,x 

AND  STORE  IT  BACK  IN  BUFFER 

06800 

06A9  BE 

0669 

LDS 

TENPST 

RECOVER  STACK  POINTER 

06810 

06  AC  17 

TBA 

06  820 

06AD  39 

RTS 

06830 

* 

06840 

♦FUNC: 

CALINT 

06  850 
06860 
06870 
06880 
06  890 
06900 
06910 
06920 
06930 
06940 
06950 
06960 
06  970 
06980 
06990 
07  000 
07010 
07020 


* INPUTS:  NONE 
♦OUTPUTS:  NONE 
♦CALLS:  NOTHING 

♦DESTROYS  :NO  REG  (INTR  HANDLER) 

♦PURPOSE:  THIS  ROUTINE  IS  USED  FOR  CALIBRATING 

*  THE  MAX  NUMBER  OF  LOOPS  POSSIBLE  DURING 

*  AN  INTERRUPT  PERIOD.  TO IS  ROUTINE  UPDATES  TOE 

*  DONTST  FLAG  AND  RESETS  TOE  ST6800  INT  FLIP  FLOP 

*  AND  THEN  RETURNS. 


06 AE  7C  0250  CALINT  INC 

06 B1  B7  E400  STA  A 

06B4  01  NOP 

06 B5  3B  RTI 


DONTST  INCRENENT  DONE  TEST  FT  AG 
ADCZRO  CLR  ST6800  INTR  FLIP  IT/)? 


*  END  OF  TOLAN-A  OVERLAY  ROUTINES 

* 

END 
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COOIiC 

00040 

c 

OC'vo 

00070 

00080 

00090 

00100 

00110 

00120 

00130 

00140 

00150 

00160 

00170 

00180 

00190 

00200 

00210 

00220 

00230 

00240 

00250 

00260 

00270 

00280 

00290 

00300 


* 

*  PROGRAM  NAME :  DECPRS 

*  AUTOOP.  :  CAPT.  MEL  TOWNS!!'® 

*  VERSION  :  1.3 

*  VERSION  DATE  :  29  NOV  80 

* 

************* *************************************** 
* 

*  PROGRAM  DESCRIPTION 

* 

*  THIS  PROGRAM  PERFORMS  TOE  DECOMPRESSION  OPERATI 

*  ON  TOE  DATA  COMPRESSED  BY  THE  TOLAN-A , TOLAN-B , DTO/E 

*  ETC.  THE  ROUTINE  ASSUMES  THAT  THE  DATA  IS  IN  NEMO 

*  AND  READS  TOE  COMPRESSION  TYPE  FROM  THE  MEMORY  FIL 

*  BUFFER  HEADER.  AFTER  PROMPT  TO  TOE  TERMINAL,  THIS 

*  PROGRAM  BEGINS  DECOMPRESSION  AND  OUTPUTS  THE  DECOM 

*  DATA  TO  AN  ANALOG  DISPLAY  DEVICE  (IE  OSCILLISOOPE) 

*  D/A  CONVERTER  0.  TOE  ROUTINE  REQUIRES  AN  INTERPUP 

*  CLOCK  VIA  TOE  A/D  BOARD  (ST6800)  AND  TOE  ASSUMFTIO 

*  IS  MADE  TOAT  THE  INTERRUPT  CLOCK  FREQUENCY  IS  ADJU 

*  TO  TOE  SAMPLE  RATE  AT  WHICH  TOE  DATA  WAS  TAKEN. 

* 

**************************************************** 

* 

*  START  OF  DECFRS 

* 

**************************************************** 

* 


00310 

0500 

ORG 

$0500 

PROGRAM  ORIGIN 

00320 

* 

00330 

OPT 

O 

AS SB  OPT.  LIST  ASSMBLY 

00340 

OPT 

NOG 

AS SB  OPT.  SUPRESS  FCC  LIST 

00350 

* 

00360 

**************************************************** 

00370 

* 

0C380 

* 

LABLE  DESCRIPTIONS 

00390 

* 

00400 

*  SUPPORT  SUBROUTINES 

00410 

* 

00420 

CA8F 

OUTNCk  EQU 

0CA8F 

EPRCMDOS .  OUTPUT  STRING 

00430 

CA2C 

KEYBD0  EQU 

$CA2C 

EPRCMDOS.  INPUT  ALPH  STRING 

00440 

0100 

DISPLA  EQU 

$0100 

EKG-EXEC.  TERMINAL  INTFC  DRIV 

00450 

* 

00460 

*  DATA  BUFFERS 

00470 

* 

00480 

0020 

CHNLBF  EQU 

$0020 

am  SELECT  FLG  FRM  DISPLAY 

00490 

3C00 

XINIT  EQU 

$3C0G 

INITIAL,  COND  CH  X 

00500 

3C01 

YIN  IT  EQU 

S3C01 

INITIAL  COND  CH  Y 

00510 

3C02 

ZINIT  EQU 

$3C02 

INITIAL  COND  CH  Z 

00520 

3002 

ENDBUF  EQU 

$3002 

END-OF-STRING  FRM  TERM  INPUT 

00530 

FFF8 

IRQVEC  EQU 

$FFF8 

MASKABLE  INTR  JEEP  VECTOR  ADDR 

00540 

3400 

fDRSTR  EQU 

$3400 

MEM  FILE  HEADER  ADDR 

00550 

3C00 

SECZRO  EQU 

$3C00 

DATA  START  LOCATION 

00560 

* 
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C05~  0 

*  HARDWARE 

ADDRESSES 

00580 

* 

C0; '  E5C0 

DACZRO  ECU 

8' '500  D/A  C  0 

00-  .  3  L4G0 

ADCZKO  LC'J 

$E4G0  A/D  G!  0 

00610 

★ 

006  20 

★ 

0063  0 

♦FUNCTION: 

DECFRS 

00640 

♦INPUTS  :  CHNL  SELECT  VIA  CHNLBF 

006  50 

♦OUTPUTS  : 

DECRPRSED  DATA  VIA  D/A 

00660 

♦CALLS  :  OUT!\XZR,KEYBDO,  DISPLAY 

00670 

♦DESTROYS 

(REG)  :  A,B,X,CC 

006  80 

♦PURPOSE  : 

THIS  IS  TIE  SET  UP  ROUTINE  WHICH  INITIALI 

00690 

*  THE  PROGRAM  CONSTANTS  AND,  DETERMINES  WHAT  T/ PE  OF 

00700 

*  COMPRESSION  WAS  USED,  AND  ENABLES  RECONSTRUCTION 

007  1  0 

*  INTERUPFTS. 

00720 

* 

00730  0500  OF 

DECPRS  SEI 

00740  0501  FE  3400 

LDX 

HDRSTR  GET  CMFRS  TYPE  FROM  MEM  FILE 

00750  0504  FF  053  8 

STX 

NOTDN1  SEP.  CPR  TYPE  IN  ERROR  LEG 

00760  0507  8C  5441 

CPX 

#$5441  IS  IT  TOiAN-A? 

00770  050 A  27  61 

BEQ 

TADECP  YES.  C-0  DECPRS  IT. 

007  80  0  50C  CE  0518 

LDX 

#NOTDNE  NO.  CPRS  ROUTINE  MOT  DONE 

00790  0  50F  BD  CA8F 

JSR 

OUTKCR  PRINT  ERROR  LEG  &  RETURN 

00800  0512  BD  CA2C 

JSR 

KEYBD0 

00810  0515  7E  0100 

JMP 

DISPIA  RETURN  TO  DISPLAY  ROJTINE 

00  820 

* 

00830  0518  1A07 

NOTDNE  FDB 

$1A07,$0D0A 

00840  051C  44 

FCC 

/DECOMPRESSION  FOR  FILE  TYPE  / 

00850  0538  0002 

NOTDNi  RMB 

2 

00860  053 A  20 

FCC 

/  NOT  YET  IMPLEMENTED./ 

00870  054F  0D0A 

FDB 

$0D0A,$0D0A 

00  880  0  553  50 

FCC 

/PRESS  ANY  KEY  TO  CONTINUE/ 

00890  056C  04 

FCB 

4 

00900  * 

00910  0  56D  96  20  TADECP  LDA  A  QIKLBF  GET  WHICH  CHANNEL  TO  BE  DECPR 

00920  0  56F  81  00  CMP  A  #0  IS  IT  am  X? 

00930  0571  26  07  TADECO  BNE  TADEC1  NO.  CHECK  IF  Y. 

00940  0573  C6  58  LDA  B  #'X  PUT  ASCII  X  IN  ERROR  LEG 

00950  0575  F7  0846  STA  B  QTNASC 

00%  0  0  57  8  20  1  0  BRA  TADEC3 

00970  057 A  81  01  TADEC1  CMP  A  #1  IS  IT  CH  Y? 

00980  057C  26  07  ENE  TADEC2  NO.  MUST  BE  Z. 

00990  057E  C6  59  LDA  B  #'Y  PUT  ASCII  Y  IN  ERROR  MSG 

01000  0580  F7  0846  STA  B  CHNASC 

01010  0583  20  05  BRA  TADEC3 

01020  0585  C6  5A  TADEC2  LDA  B  #'Z  PUT  ASCII  Z  IN  ERROR  MSG 

01030  0587  F7  0846  STA  B  CHNASC 

01040  058A  CE  0811  TADEC3  LDX  #GOMSG  GET  PRCf-iFT  MSG  LOC 

01050  058D  BD  CA8F  JSR  OU1NCR  NOW  PRINT  PROMPT 

01060  0590  BD  CA2C  JSR  KEYBD0 

01070  0593  FE  3002  LDX  ENDBUF  GET  ANSWER  FROM  TERMINAL 

01080  0596  09  DEX 

01090  0597  E6  00  LDA  B  0,X 

01100  0599  Cl  4E  CMP  B  #'N  WAS  IT  NO? 
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C1110  059B  26  03 

BNE 

TADEC4 

YES.  EXIT  ROUTINE 

01120  059D  7E  0100 

JMP 

DISPLA 

m  ?,'i  ov.n  c.r'  3co3 

T.TTC4  LDX 

••  C 

+3  POSITION  I ’•/INTER  TO  DTA  STR 

CilCU  03/33  tF  0611 

STX 

run 

01150  05A6  86  80 

LDA  A 

#$80 

INITIALIZE  BITPIR  TO  LEFT  BIT 

01160  05A8  B7  0613 

STA  A 

BITPTR 

01170  05AB  7F  0617 

CLR 

XSLOPE 

INIT  SLOPES  TO  ZERO  (2ND  INIT 

01180  05AE  7F  0618 

CLR 

YSLOPE 

01190  05B1  7F  0619 

CLR 

Z SLOPE 

01200  05B4  B6  3C00 

IDA  A 

XINIT 

GET  FIRST  INIT  COND 

01210  05B7  B7  0614 

STA  A 

XDTA 

S,  PUT  IN  DATA  BUF 

01220  05BA  B6  3C01 

IDA  A 

YIN  IT 

01230  05ED  B7  0615 

STA  A 

YDTA 

01240  05C0  B6  3C02 

IDA  A 

ZINIT 

01250  05C3  B7  0616 

STA  A 

ZETA 

01260  05C6  7F  0629 

CLR 

TARFLG 

CLR  DECFRSION  FLG 

01270  05C9  7F  061A 

CLR 

CELT 

INIT  TIME  COUNTER 

01280  05CC  FE  FFF8 

IDX 

IROVEC 

PICK  UP  CURRENT  INT  VEC 

01290  05CF  FF  C61D 

STX 

VECSAV 

SAVE  IT  IN  TEMP  BUFFER 

01300  OSD 2  CE  062F 

LDX 

#TAREOI 

FUT  NEW  INT  VEC  IN 

01310  05D5  FF  FFF8 

STX 

IRQVEC 

01320  05D8  86  AA 

LDA  A 

#$AA 

SET  DONTST  FLAG 

01330  05DA  B7  062A 

STA  A 

DONTST 

01340  05DD  CE  0000 

LDX 

#0 

01350  05E0  FF  E500 

STX 

DACZRO 

SEND  ENABLE  PLS  TO  INT  CIRCUI 

01360 

★ 

01370  05E3  OE 

TAINTR  CLI 

ENABLE  CPU  FOR  RECONS  INTR’S 

01380  05E4  B6  062A 

LDA  A 

DONTST 

G1ECK  IF  DECPRS  DONE 

01390  05E7  81  00 

CMP  A 

#0 

DONE  YET? 

01400  05E9  26  F8 

BNE 

TAINTR 

NO.  KEEP  LOOPING 

01410  05EB  OF 

SEI 

INSURE  INTR  DISABLE 

01420  05EC  CE  0878 

LDX 

tGOAGIN 

PRINT  GO  AGAIN  MSG 

01430  05EF  BD  CA8F 

JSR 

OUTNCR 

"ENTER  CONTINUATION  COMMAND" 

01440  05F2  BD  CA2C 

JSR 

KEYED  0 

01450  05F5  FE  3002 

IDX 

ENDBUF 

NOW  GET  COMMAND 

01460  05F8  09 

DEX 

01470  05F9  E6  00 

IDA  B 

0,X 

01480  05FB  17 

TEA 

PUT  IT  IN  A 

01490  05FC  90  28 

SUB  A 

$28 

TRANSFORM  X  TO  0 

01500  05FE  97  20 

STA  A 

CHNLBF 

PUT  IN  CHNL  FLAG 

01510  0600  F7  0846 

STA  B 

o;nasc 

FUT  ASCII  IN  ERROR  MSG 

01520  0603  Cl  58 

CMP  B 

#'X 

WAS  IT  ,LT.  ’X? 

01530  0605  2D  07 

BLT 

TADEC5 

YES.  EXIT  ROUTINE 

01540  0607  Cl  5A 

CMP  B 

#’Z 

WAS  07®  ,GT.  ’  Z  ? 

01550  0609  2E  03 

BGT 

TADEC5 

YES.  EXIT  ROUTINE 

01560  06 OB  7F.  05A0 

JMP 

TADEC4 

NO.  GO  EXECUTE  DECPRS  AGAIN 

01570  06 OE  7E  0100  TADEC5  JMP 

DISPLA 

RETURN  TO  DISPLAY 

01580  * 

01 5  90  *★**********★★*★★**★*★★★****•*★************* -.v-******** 

01600  *  EM)  DECPRS  INIT  ROUTINE 

01610  ★fc************************************  ************** 

01620  * 

01630  * 

01640  *  PARAMETER  BUFFER 
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C16  50 

01660  0611  0002 

CL  0  V ' 1 ?  0601 

01fcv.li  06 1*.-  in.  61 

01690  0615  0001 
01700  0616  0001 
01710  0617  0001 
01720  0618  0001 
01730  0619  0001 
01740  06 1A  0001 
01750  061B  0001 
01760  06 1C  0001 
01770  06 ID  0002 
01760  06  IF  0001 
01790  0620  0001 
01800  0621  0001 
01810  0622  0001 
01820  0623  0001 
01  83  0  06  2  4  0  001 
01840  0625  0001 
01850  0626  0001 
01  86  0  0627  0  002 
01870  0629  0001 
01880  062A  0001 
01890  062B  0002 
01900  06 2D  0002 
01910 
01920 
01930 
01940 
01950 
01960 
01970 
01980 
01990 
02000 
02010 
02020 
02030 

02040  062F  B7  E400 
02050  0632  01 
02060  0633  BF  062D 
02070  0636  F6  0846 
02  0  80  06  3  9  81  58 
02090  063B  26  08 
02100  06 3D  B6  0614 
02110  06  40  PD  0796 
02120  0643  20  12 
02130  0645  81  59 
02140  0647  26  08 
02150  0649  B6  0615 
02160  06 4C  BD  07  % 
02170  064F  20  06 
02180  0651  B6  0616 


BDFPTR  RMB  2 

i  IV;  VP  ; . .  •  j 

XLVA  1 

YOTA  RMB  1 

ZOTA  RMB  1 

XSLOPE  RMB  1 

Y SLOPE  RMB  1 

Z SLOPE  RMB  1 

DELT  RMB  1 

VALUE  RMB  1 

CUT  RMB  1 

VECSAV  Rl®  2 

BITVLU  RMB  1 

SIGN  Rf-IB  1 

XACCEL  RMB  1 

XTFMP  RIB  1 

YACCEL  RMB  1 

YTEMP  RMB  1 

ZACCEL  RMB  1 

ZTEMP  RMB  1 

KORKBF  iy-B  2 

TARFLG  RMB  1 

DCNTST  RMB  1 

DABUF  RMB  2 

STKSAV  RMB  2 


CURRENT  Mill  1  FILE  V.’ORD  POINTER 
C.  "I  ‘  1 V  i;;  ;•  PWTiP; 

Cii  X  L.  Li; 

CH  Y  DATA  BUG 
CH  Z  DATA  BUF 
CH  X  1ST  DIFF  BUFFER 
CH  Y  1ST  DIFF  BUF 
CH  Z  1ST  DIFF 

TIME  COMPRESSION  RUN  LEM  BUFF 
DATA  RET  BUF  FROM  GE’IVLU 
COUNTER  IN  GETTIM 
IRQ  VECTOR  SAVE  BUF 
BIT  SET/RESET  FLAG  FROM  GETEI 
SIGN  BIT  ON  DECODED  DATA 
UNOODED  CH  X  ACCEL  DATA 
TEMP  BUI’  USED  IN  DECFRS 
ENCODED  Cii  Y  ACCEL  DATA 
TEMP  BUF  USED  IM  DECFRS 
UNOODED  Ci  Z  ACCEL  DATA 
TEMP  BUF  USED  IN  DECPRS 
TEMP  CORKING  BUFFER 
FLG  USED  IN  DECPRS  AICORITHM 
FLG  USED  TO  EXIT  INTR  LOC? 

D/A  CONV  OUTPUT  BUFFER 
TEMP  STACK  SAVE  BUFFER 


♦FUNCTION  :  TARECN 
♦INPUTS  :  BUFFER  VALUES 
♦OUTPUTS  :  D/A  VALUES  VIA  ST-6800 
♦CALLS  :  GETOLU,  GETTIM,  CUTDA 
♦DESTROYS  A,B,X,CC 

♦PURPOSE  :  THIS  IS  WE  INTERRUPT  SERVICE  ROUTINE  OKI 

*  PERFORMS  RECON  STRUCT  ION  CM  TOE  TOLAN-A  ENCODED  DAT 

*  FILE  IN  MEMORY.  TOE  DATA  IS  DECODED  AND  OUTPUT  ON 

*  D/A  (ST6800)  CH  0. 


★  ★★★*********★*★**•**  *****^**  **********  ******  ******** 
★ 


TARECN 

STA  A 
NOP 

ADCZRO 

ACK  INTO.  RESET  INTO  FF  ON’  ST 

STS 

STKSAV 

SAVE  ENTRY  STACK  FOR  FT] 

lda  A 

chnasc 

QIECK  CEIL  SELECT,  output  cur 

CMP  A 

S'X 

IS  CHNNL  SELECT  X  V 

ENE 

TARECl 

NO.  CHK  IF  Y 

LDA  A 

XDrTA 

YES.  GET  CUR  XDTA  VA EL”. 

JSR 

CUTDA 

CUTOUT  VALUE  VIA  D/A  V.  0 

BPA 

TARE22 

TAREC1 

CMP  A 

#'Y 

IS  CHNNL  SELECT  Y  ? 

BNE 

TAR  EC  2 

NO.  MUST  BE  Z 

LDA  A 

YOTA 

GET  CUR  YOTA  VALUE. 

JSR 

OUTDA 

OUTPUT  Y  VALUE  VIA  D/'.A  CH  0 

BRA 

TARE22 

TAREC2 

LDA  A 

ZOTA 

GET  CUR  ZOTA  VALUE. 
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02190 

0654  BD 

0796 

JSR 

CXTDA 

OUTPUT  Z  VALUE  VIA  D/A  CH  0 

02200 

0657  B6 

0629  TARE22 

1  IDA  A 

TARFLG 

LAS  LAST  DATA  PT  RXTROIOLATED 

O.T'O 

.•] 

CO 

C.P  A 

0 

0,..  ..J 

Uo-U  -o 

33 

- .  J  vL 8-  3 

y  -  s.  cu  (•:  "  t  a  re::.  " 

02230 

06 5E  86 

58 

LDA  A 

#'X 

PUT  ASCII  X  IN  GETVLU  ERROR  M 

02240 

0660  B7 

0A3D 

STA  A 

OVFLCH 

02250 

0663  BD 

0700 

JSR 

GETVLU 

NOW  GO  GET  NEXT  XACCEL  VALUE 

0  2260 

0666  B6 

06  IB 

LDA  A 

VALUE 

AND  PUT  XACCEL 

02270 

0669  B7 

0621 

STA  A 

XACCEL 

02280 

06 6C  B7 

0622 

STA  A 

XTEMP 

SAVE  XACCEL  IN  TRIP  BUFF 

02290 

066F  86 

59 

LDA  A 

#'Y 

RT  'Y  IN  GETVLU  ERROR  MSG 

02300 

0671  B7 

0A3D 

STA  A 

OVFLCH 

023  1  0 

0674  BD 

0700 

JSR 

GETVLU 

GET  YACCEL  CTA 

023  20 

0677  B6 

06  IB 

IDA  A 

VALUE 

02330 

06 7 A  B7 

0623 

STA  A 

YACCEL 

PUT  IN  YACCEL  VAR 

023  40 

067D  B7 

0624 

STA  A 

YTEMP 

PUT  IN  YACCEL  TEMP  VAR 

023  50 

06  80  86 

5A 

IDA  A 

#'Z 

PUT  'Z  IN  GETVLU  ERROR  MSG 

02360 

06  82  B7 

0A3D 

STA  A 

OVFLCH 

0237  0 

06  85  BD 

0700 

JSR 

GETVLU 

GET  ZACCEL  DATA 

02380 

0688  B7 

0625 

STA  A 

ZACCEL 

RIT  IN  ZACCEL  VAR 

02390 

06  8B  B7 

0626 

STA  A 

ZTEMP 

PUT  IN  ZACCEL  TEMP  VAR 

02400 

06 8E  BD 

07  5E 

JSR 

GETTIM 

NOW  GET  TIME  COPRESSICN  RUN  L 

02410 

0691  7F 

0629  TAREC3 

CLR 

TARFLG 

RESET  FLAGS 

02420 

0694  7A 

061 A 

DEC 

DELT 

NOW  CK  IF  RUN  LEW  ONLY  1 

02430 

06  97  27 

09 

BEQ 

TAR  EC  4 

YES.  ACCEL  VAR  NOT  ZERO 

02440 

0699  7F 

0621 

CLR 

XACCEL 

ACCEL  WAS  ZRO  SO  CLR  X-Y-ZACC 

02450 

06 9C  7F 

0623 

CLR 

YACCEL 

02460 

06 9F  7F 

0625 

CLR 

ZACCEL 

02470 

06A2  B6 

0617  TAREC4 

LDA  A 

XSLOPE 

NOW  GET  LAST  SLOPE 

02480 

06A5  BB 

0621 

ADD  A 

XACCEL 

&  CALC  NEW  SI., OPE  WITH  ACCEL 

02490 

06A8  B7 

0617 

STA  A 

XSLOPE 

02500 

06AB  B6 

0618 

LDA  A 

YSLOPE 

02510 

06 AE  BB  0623 

ADD  A 

YACCEL 

02520 

06  B1  B7 

C618 

STA  A 

YSLOPE 

02530 

06B4  B6 

0619 

LDA  A 

Z SLOPE 

02540 

06 B7  BB 

0625 

ADD  A 

ZACCEL 

02550 

06 BA  B7 

0619 

STA  A 

Z SLOPE 

02560 

06  BD  B6 

0614 

LDA  A 

XDTA 

NOW  CALC  DATA  VALUE  USING  SLO 

02570 

06C0  BB 

0617 

ADD  A 

XSLOPE 

02580 

06C3  B7 

0614 

STA  A 

XDTA 

02590 

06C6  B6 

0615 

LDA  A 

YDTA 

026  00 

06C9  BB  0618 

ADD  A 

YSLOPE 

026  1  0 

06CC  B7 

0615 

STA  A 

YDTA 

02620 

06CF  B6 

0616 

IDA  A 

ZDTA 

02650  06D8  B6  061A  IDA  A  DELT  WA S  RUN  LEN  .GT.  2  PIS  ? 

02660  06DB  27  22  BBQ  TARRTI  IF  YES,  DON’T  GET  REA"  OTU  FIL 

02670  06DD  81  01  CMP  A  #1  JUST  EXTROPGLATE  POETS  PAIL 

02680  06DF  27  07  BEQ  TAREC5  DELTA  IS  REDUCED  TO  1 

02690  06 El  86  37  LDA  A  #55  SET  TARFLl 

02700  06 E3  B7  0629  STA  A  TARFLG 

02710  06E6  20  17  BRA  TARRTI 

027  2  0  06  E  8  B6  0622  TAR  ECS  IDA  A  XTEMP  RETRIEVE  ACCEL  VLUS  TV.EVIOUSL 
02730  06 EB  B7  0621  STA  A  XACCEL 

02740  06 EE  B6  0624  IDA  A  YTEMP 
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02750  06F1  B7  CG23 
02760  06 F 4  F6  0626 
02770  06F7  F7  0625 
02712  06 FA  SC  55 


STA  A  YACCFL 
LDA  A  ZTEMP 
STA  A  ZACC.’L 


u  — ,  >. v  uul/i  wO  /I  i'C\.  6.-1  1 . w i' ]_i—  ijj/Vii 

02790  06 FC  B7  0629  STA  A  TARFLG 

02800  06 FF  3B  TARRTI  RTI 

02810  * 

02820  **************************************************** 

02  830  *  END  OF  INTERRUPT  PA'JDLFR 

02840  **************************************************** 

02850  * 

02  860  *  SUBROUTINES 

0  2  870  * 

02  8  80  * 

02890  ^FUNCTION  :  GEWLU 

02900  *INPU'JS  :  BUFPTR,  RITPTR,  SIGN  BUFFERS 

02910  *OUTPUTS  : VALUE  BUFFER 

02920  *CALLS  :  GETBIT 

02930  *DFSTROYS  :  A,X,CC 

02940  *  PURPOSE  :  THIS  ROUTINE  SCANS  MEMORY  STARTING  AT  POI 

02950  *  DEFINED  BY  BUFFTR , BITPTR  ANT)  GETS  ACCEL  VALUE.  BIT 


O’ SURE  VALUE  IS  Cl,  FAR  ON  STAR 
GET  DELIMITER  BIT 


02850 
02  860 
0  2  870 
02880 
02890 
02900 
02910 
02920 
02930 
02940 
02950 


02960 

*  AND  BITPTR 

ARE  UPDA' 

0  2970 

* 

02980 

★ 

02990 

0700 

7F 

06 IB  GETVLU  CLR 

VALUE 

03000 

0703 

BD 

07  BD 

JSR 

GETBIT 

03010 

0706 

B6 

06  IF 

LDA 

A 

BITVLU 

03020 

0709 

81 

00 

CUP  A 

*0 

03030 

07  0B 

27 

Co 

BEQ 

GETVLl 

03040 

07 CD  CE 

097D 

LDX 

SSYNCMS 

03050 

0710 

7E 

07F5 

JMP 

ERROR 

03060 

0713 

7F 

0620 

GETVL1  CIR 

SIGN 

03070 

0716 

ED 

07  BD 

JSR 

GETBIT 

03080 

0719 

B6 

06  IF 

LDA 

A 

BITVLU 

03090 

07 1C 

81 

00 

CMP 

A 

#0 

03100 

07  IE 

27 

03 

BEQ 

GETVL2 

03110 

0720 

73 

0620 

COM 

SIGN 

03120 

0723 

BD 

07 BD  GETVL2  JSR 

GETBIT 

03130 

0726 

B6 

06  IF 

LDA 

A 

BITVLU 

03140 

0729 

26 

11 

RNE 

GETVL4 

03150 

07  2B 

FE 

G611 

C-ETVL3  LDX 

EUFPTR 

03160 

07  2E 

78 

0613 

ASL 

BITPTR 

03170 

0731 

24 

2A 

BCC 

GETVT,6 

03180 

0733 

79 

0613 

ROL 

BITPTR 

03190 

0736 

09 

DEX 

03200 

0737 

FF 

0611 

STX 

BUFPTR 

03210 

07  3 A 

20 

21 

BRA 

GETVL6 

03220 

07  3C 

7C 

C51B 

GETVL4  INC 

VALUE 

03230 

07  3F 

2A 

06 

BFL 

GETVL5 

03240 

0741 

CE 

09FB 

LDX 

•JOVFIJ1S 

03250 

0744 

7E 

07  F  5 

JMP 

ERROR 

03260 

0747 

ED 

07 BD  GETVL5  JSR 

GETBIT 

03270 

07  4A  B6 

061F 

LDA 

A 

BITVT.U 

03280 

07  4D 

81 

00 

CMP  A 

#0 

IS  DEL  O'.  BIT  =0  ? 

YES.  GET  NEXT  BIT 

NO.  SYNC  ERROR  HAS  CC CITED.  E 

INSURE  SIGN  CLP. 

GET  SIGN!  BIT 

IS  ACCEL  ros? 

YES.  LEAVE  SKIN  CLR 
NO.  SET  SIGN  FLAG 
GET  FIRST  CODE  BIT 


END  OF  VALUE  DECODE.  PACK  UP 
FOR  CORRECT  PCS  IT  ION  EC  FOR  N 
VALUE  FETCH 


NCH  PAST  DELIM  &  SIGN.  TC7  CO 
BIlC.  IS  CODE  LORD  >  127  ? 
YTS.  CVLRFLCC  FAS  OCCUR ED.  PR 

NOW  GET  DATA  VAJ.UF  CCPF.  BUS 

DELIM  DETECTED  YET? 
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03250 

07  4F 

26 

EE 

b:ie 

GETVL4 

NO. 

Kr'P  1  ETCHING 

BITS 

03300 

07  51 

B6 

0620 

LDA  A 

SION 

YES. 

GET  SIGN  ANT) 

ADJUST  GIT 

( 

* 

Cl 

ro 

CP:  a 

-o 

033-.. 

v.  /  L  6 

i~  / 

">■ 

L,;  n 

CLTVL3 

sic:; 

(..  VALUE  COP 

.  ;r:  ;:.j  me 

03330 

075b 

70 

06  IB 

NEC 

VALUE 

sign 

1.  TAKE  2 1 S  COMP,  ALU  IT 

03340 

07  5B 

20 

CE 

BRA 

GETVL3 

03350 

07  5D 

39 

GETVL6 

RTS 

03360 

03370 

03380 

03390 

03400 

03410 

03420 

03430 

03440 

03450 

03460 

03470 

03480 

03490 


*  END  OF  SUBROUTINE  CETYL U 

'k'k'k'ki^'k’k'k'k'kicki^'k-k’k’k’k'k'k'k'k'k’k'k'k'k'k-k'k'k'k'k’k'k’k-kicyc'k-k'k'k'k  "k^'k'k'k-kiei: 

* 

* 

♦FUNCTION  :  GETTIM 

♦INPUTS  :  BITVLU  (CURR  BIT  VALUE  PI” ED  TO) 

♦OUTPUTS  :  DEBT  (CURRENT  TIME  COUNT) 

♦CALLS  :  GETBIT,  ERROR 
♦DESTROYS  :  A,X,CC  REGISTERS 

♦PURPOSE  :  THIS  ROUTINE,  V.iiEN  GUI.LD  AFPER  3  GETVLU 


*  RETURNS  THE  VALUE  OF 

*  VARIABLE  DELT. 


THE  PUN  LENGTH  TIME  COUNTER  I 


03500 

* 

03510 

•k 

03520 

07  5E 

BD 

07  ED  GETTIM 

JSR 

GETS IT 

GET  DELIM  BIT 

03530 

0761 

B6 

06  IF 

LDA 

A 

BITVLU 

03540 

0764 

81 

00 

CMP 

A 

#0 

IS  BIT  0? 

03550 

0766 

27 

06 

BEQ 

GETTU 

YES.  PROPER  DELIM.  CONTINUE 

03560 

0768  CE 

09AA 

LDX 

JSYNCTI 

NO.  SYNC  ERROR.  PRINT  &  EPxR  O 

03570 

076B  7E 

07F5 

JMP 

ERROR 

03580 

07  6E 

7F 

C51A  GETTI1 

CLR 

DELT 

INSURE  TIME  GIT  INITIALLY  CLR 

03590 

0771 

86 

07 

LDA 

A 

#7 

IN IT  CNT  FOR  7  BIT  TIME 

03600 

0773 

B7 

06 1C 

STA 

A 

GTT 

03610 

0776 

BD 

07  ED  GETTI2 

JSR 

GET5IT 

GET  DELTA  T  EIT 

03620 

0779 

B6 

C61F 

LDA 

A 

BITVLU 

03630 

07  7C 

BA 

06 1A 

ORA 

A 

DELT 

SET  LSB  BIT  ACCORD  TO  T  BIT 

03640 

077F 

B7 

06 1A 

STA  A 

DELT 

03650 

07  82 

78 

05 1A 

ASL 

DELT 

SHIFT'  DELT  FOR  NEXT  BIT 

03660 

0785 

7A 

06 1C 

DEC 

GIT 

DONE  WITH  TUT  YT.T? 

03670 

07  88 

26 

EC 

BNE 

GETTI2 

NO.  KEEP  FETCHING  TIME  BITS 

03680 

07  8A  B6 

06 1A 

LDA 

A 

DELT 

YES.  GET  TINE  V/'LLT 

03690 

07  8D 

26 

06 

BNE 

GETTI3 

IS  TIME  GIT  0  ? 

03700 

07 8F  CE 

0A3F 

IBX 

ITIM’RR 

YES.  ERROR.  PRNT  ERR  MSG 

03710 

0792 

7E 

07F5 

JMP 

ERROR 

AND  EPKKCR  CEE 

03720 

0795 

39 

GETTI3 

RTS 

03730 

★ 

03740 
03750 
03760 
03770 
03780 
03790 
03  800 
03810 
03820 


*  *★*★**  At*  ★  *  *  ★  *  St  ■fc’k’k'k’k'k’k’k'k  £  ★*★★★***★*  *  ★  *  *  *****  *******  * 

*  END  GETTIM  SUBROUTINE 

*  ********************************  ******************** 


♦FUNCTION  :  OUTPA 

♦INPUTS  :  DATA  VALUE  TO  BE  D/A’ED  IN  ACC  A 
♦OUTPUTS  :  VALUE  IN  ACC  A  VIA  D/A  G!  0 
♦CALLS  :  NOTHING 
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03  BO 
03  MO 
ro ;  '  [1 

03060 

03870 

03880 

03890 

03900 

03910  0796  36 

03920  0797  B7  06 2C 

03930  07  9A  7F  C62B 

03940  07 9D  78  06 2C 

03950  07 AO  79  0623 

0396  0  07 A3  78  06 2C 

03  97  0  07 A6  7  9  062B 

03  9  80  07 A9  7  8  C62C 

03990  07 AC  79  06 2B 

04000  07 AE  78  06 2C 

04010  07112  79  0623 

04020  07 B5  FE  06 2B 

04030  07B8  FF  E500 

04040  07 BB  32 

04050  07 BC  39 

04060 

04070 

04080 

04090 

04100 

04110 

04120 

04130 

04140 

04150 

04160 

04170 

04180 

04190 

04200 

04210 

04220 

04230 

04240  07 BD  7F  06 IF  < 
04250  07C0  FE  0611 
04260  07C3  F6  0613 
04270  07C6  E5  00 
04280  07C8  27  03 
04290  07 CA  7C  061F 
04300  07 CD  74  0613  < 
04310  07 DO  24  22 
04320  07D2  76  0613 
04330  07D5  08 
04340  07D6  FF  0611 
04350  07D9  F6  0611 
04360  07 DC  Cl  80 


♦DESTROYS  :  B,CC 

*  PURPOSE  :  TOTS  ROUTINE,  OUTPUTS  TOE  DATA  IN 

*  ACCUCTA  TO  A  TO  TO"  D/A  !  O  I  Or :  T 

*  TRAN Si-i ISSiC! » .  TEE  8  BIT  VALID  IS  CEUCEJ 

*  TO  FORM  THE  12  PIT  OPERAND  REQUIRED  BY  TOE 

*  D/A  (ST6800)  . 


PSH  A 

SAVE  VLU  IN  A  ACC 

STA  A 

DABUF+1 

PUT  VALUE  IN  D/A  OUT  EUFF 

CLR 

DABUF 

CLR  MSB  BYTE  OF  D/A  OUT  PL’] 

ASL 

DABUF+1 

LEFT’  SHIFT  2  BYTE  D/A  LORD 

RQL 

DABUF 

TOR  CONVERSION  OF  8  PIT 

ASL 

DABUF+1 

VALUE  TO  12  BIT 

ROL 

DABUF 

ASL 

DABUF+1 

ROL 

DABUF 

ASL 

DABUF+1 

RCL 

DABUF 

LDX 

DABUF 

NON  LD  INDEX  LITO  12  BIT  VI 

STX 

DACZRO 

AND  OUTFUT  TO  D/A 

PUL  A 
RTS 

RETRIEV  EHTY  A  ACC  VLUE 

*************  ********  ****** ********  ***********  *  vV  *  *  *  * 

*  END  SUBROUTINE  OUTDA 
***************************  ********  *********  *  ******* 

* 

* 

* FUNCTION  :  GETBIT 
* IN PUTS  :  BUFPTR, BITTTR  POINTERS 
♦OUTPUTS  :  BITVLU,  DONTST  FLAGS 
*CALLS  : NOTHING 
♦DESTROYS  :A,CC 

♦PURPOSE  :  THIS  ROUTINE  CHECKS  TOE  STATE  OF  THE  BIT 

*  POINTED  TO  BY  THE  BUFPTR, BITPTR  PAIR  AND  SETS  TOE 

*  THE  BITVLU  FLAG  ACCORDINGLY.  TOTS  ROUTINE  CHECK 

*  FOR  END  OF  I  EMORY  AND  FORCES  EXIT  OF  RECONSTRUCT' IO 

*  ROUTINES  IF  ECtl  IS  DETECTED. 

* 


CLR 

BITVLU 

INSURE  BITVLU  STARTS  RESET 

LDX 

BUFPTR 

GET  MEM  LORD  POINTER 

LDA  B 

BITPTR 

GET  BIT  POINTER  r:  TOAT  MEM  V? 

BIT  B 

o,x 

CHECK  ir  BIT  SIT- 

BBQ 

GETBI1 

NO  IT  LAS  RESL  ”.  UURTO  BITVLU 

INC 

BITVLU 

YES.  PIT  v:as  set.  s:  T  BITVLU 

LSR 

BITPTR 

NOU  UPDATE  POINTERS 

BCC 

GETRTS 

ROR 

BITPTR 

inx 

STX 

BUFPTR 

LDA  B 

EUFPTR 

QJDCK  FOR  END  OF  MEMORY 

CMP  B 

#$80 

1% 


DLCM  . 

-3 

C4370 

07 DE  26 

14 

BNE 

GETRTS 

NO.  CONTINUE 

04?  80 

07 E0  OF 

SEI 

NOW  TORN  OFF  INTR  AND  RET 

r : 

'  1  CE 

4000 

IPX 

*  14000 

04 

i .  j.4  IF 

Kf-00 

i/  .  X 

DAC2LO 

04410 

07 E7  FE 

061D 

LDX 

VECSAV 

04420 

07 EA  FF 

FFF8 

ST X 

IRQVEC 

04430 

07  ED  7F 

06  2A 

CLR 

DONTST 

YFS.  CLR  DONTST  FLAG  AID  RTI 

04440 

07F0  BE 

06  2D 

LDS 

STKSAV 

RETRIEVE  INTR  STACK  PTR 

04450 

07 F 3  3B 

RTI 

0  4  460 

07F4  39 

GETRTS 

RTS 

0  4470 
04480 
04490 
04500 
04510 
04520 
04530 
04540 
04550 
04560 
04570 
04580 
04590 
04600 
04610 

04620  07F5  BD  GW 
04630  07F8  CE  09DF 
04640  07  FB  BD  CA8F 
04650  07 FE  ED  CA2C 
0801  OF 
0802  CE  4000 
0805  FF  E500 
0808  FE  06 ID 
080B  FF  FFF8 
080E  7E  0100 


**************************************************** 

*  END  OF  SUBROUTINE  GETEIT 

'k'k'k'kic'k'k'k-k'k’k'k-k'k'k'k'k'k'k’k'k-k'k'k-kick'kickic-k-k-k-klticick'k'Mc'kic'k'k'k’k’k’kfrk 


♦FUNCTION  :  ERROR 

* IN  PUIS  :  FES SAGE  STRING  POINTED  TO  BY  INDX  RFG 
♦OUTPUTS  :  ERROR  MESSAGE  TO  CONSOLE  DEVICE 
♦CALLS  :  OUTUCR,  KEYT-D0 , DISRLA 
♦DESTROYS  :  A,B,X,CC 

♦PURPOSE  :  THIS  ROUTINE  PRINTS  ERROR  MESSAGES  UPON 
*  ERROR  DETECTION  BY  THE  DECOMPRESSION  ROUTINES. 


ERROR 


04660 

04670 

04680 

04690 

047  0  0 

04710 

04720 

047  3  0 

047  40 

047  50 

04760 

04770 

047  80 

04790 

04800 

04810 

0  4  820 

04  830 

04  840 

04850 

04  860 

04870 

04880 

04890 

0  4  900 


JSR 

CUTKCR 

LDX 

SANYICEY 

GET  ANYKEY  MESSAGE 

JSR 

outncr 

PRINT  "TO  CONTINUE  PRESS  ANY 

JSR 

KEYBD0 

SEI 

NOW  CLR  INTR  CONDITION 

LDX 

#$4000 

AND  RETURN  TO  DISPLAY 

STX 

DACZRO 

LDX 

VECSAV 

RETRIEV  IRQ  VEC  ADDR 

STX 

IRQVEC 

JMP 

DISPLA 

RETURN  TO  "DISPLAY  " 

★  *★***★**  *★★★**★*******★***★★★**  ****************** 

*  END  ERROR  HANDLING  ROUTINE 

"k’k’k'k'k'k'k’k’k'k'k-k’k'k’k'k'k'k'k'k'k-k'k&'k'M'k-k-A'kik-k'kk  -klcirk-k  ic  ***★***★*■★ 

* 

*  MESSAGE  STRINGS 

* 

0811  1A0D  GOtlSG  FDB  $1A0D,$0A07 

0815  44  FCC  /DECOMPRESSION  OVERLAY/ 

082.A  0D0A  FDB  $0D0A,$0D0A 

082  E  43  FCC  /CURRENT  CHANNEL  FLAG  IS  / 

0846  0001  CHNASC  RMB  1 

0847  0D0A  FDB  $ODOA,$ODOA 

084B  44  FCC  /DO  YOU  WISH  TO  EXECUTE  THIS  MODULE  ( 

087  7  04  FCB  4 

0878  0D0A  GOAGIN  FDB  $0D0A,$0A07 

087C  44  FCC  /DECOMPRESSION  AND  DISPLAY  COMPLETE/ 

089E  0D0A  FDB  $0D0A,$0D0A 

08A2  45  FCC  /ENTER  CONTINUATION  COMMAND/ 
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C.'A  ..  . 


0481b 

03UC 

ODOA 

FDB 

$0D0A 

04920 

OPDE 

20 

FCC 

/  X=DISPLAY  QLANNEL  X  ON  D-A  CHANNE 

-  ' 

) 

ODOA 

FDB 

SC'DOA 

049-.,. 

b  ..7 

20 

ICC 

/  y^pifkay  a./:.::Eu  y  of  d~a  g;;;.:  :: 

04950 

090E 

ODOA 

FDB 

$0D0A 

0  4  960 

0910 

20 

FCC 

/  Z=DISPLAY  CHANNEL  Z  ON  D-A  CHANNE 

0  4  970 

0937 

ODOA 

FDB 

$0D0A,$0D0A 

04980 

093B  41 

FCC 

/ANY  OTHER  KEY  RETURNS  CONTROL  TO  "DI 

04990 

0966 

ODOA 

FDB 

$0D0A, $0D0A 

05000 

096A 

45 

FCC 

/ENTER  COMMAND  NOh’=/ 

05010 

097C 

04 

FCB 

4 

05020 

097D 

1A07 

SYNCMS  FDB 

$1A07,$0D0A 

05030 

0981 

53 

FCC 

/SYNC  ERROR  DETECTED  BY  TOLAN-A  DECOD 

05040 

09A7 

ODOA 

FDB 

$0D0A 

05050 

09A9 

04 

FCB 

4 

05060 

09AA  1A07 

SYNCTI  FDB 

$1A07,$0D0A 

05070 

09AE 

53 

FCC 

/SYNC  ERROR  DETECTED  BY  / 

05080 

09C5 

54 

FCC 

/TOLAN-A  DURING  TIME  FETCH/ 

05090 

09DC 

04 

FCB 

4 

05100 

09DF 

ODOA 

ANYKEY  FDB 

$0D0A 

05110 

09E1 

54 

FCC 

/TO  CONTINUE  PRESS  ANY  KEY/ 

05120 

09FA 

04 

FCB 

4 

05130 

09FB 

1A07 

OVFLMS  FDB 

$1A07 , $0D0A 

05140 

09FF 

41 

FCC 

/ACCEL  VALUE  OVERFLOW  DETECTED  BY  TOL 

05150 

0A2F 

ODOA 

FDB 

$0D0A 

05160 

0A31 

20 

FCC 

/  IN  CHANNEL  / 

05170 

0A3D 

0001 

CWFLCH  FSB 

1 

05180 

0A3E 

04 

FCB 

4 

05190 

0A3F 

1A07 

TIJERR  FDB 

$1A07,$ODOA 

05200 

0A43 

54 

FCC 

/TIME  COUNT  ERROR  DETECTED  BY  TOLAN-A 

05210 

0A6F 

ODOA 

FDB 

$0D0A 

05220 

0A71 

54 

FCC 

/TII-E  GIT  (DELT)  =0/ 

05230 

0A82 

04 

FCB 

4 

05240 

★ 

05250 

**********************************************  ****** 

05260 

* 

05270 

*  END  OF 

DEC PR S  OVERLAY  ROUTINES 

05280 

* 

05290 

★  ★★★**★★******★*★★★  'k'k'k'k'k'k'k’k-k-k'kX'klek’k'k'k'k’k’k'k’k'k'k'kii'k'k'k’k'k’k 

05300 

* 

05310 

END 
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ENTROPY 


o"1;';  p:m  * 


ekc  emtrcpy  calcvlatto::  rc-ccM 


0130  REM  * 


0150  REM  * 

0160  REM  *  THIS  PROGRAM  READS  THE  FREQUENCY 
0170  REM  *  OF  OCCURENCE  DATA  IN  MEMORY  FROM  AN 
0180  REM  *  EKG  DATA  COLLECTION  AND  CALCULATES 
0190  REM  *  THE  ENTROPY  OF  THE  X , Y , AND  Z  DATA 
0200  REM  *  SOURCES.  THE  CALCULATED  ENTROPY  IS 
0210  REM  *  STORED  BACK  IN  THE  MEMORY  FILE  HEADER 
0220  REM  *  IN  ASCII.  THIS  HEADER  CAN  THEN  BE 
0230  REM  *  INSERTED  INTO  THE  DISK  FILE  USING 

0240  REM  *  MINIDOS. 

0250  REM  * 

0260  REM  *************************************** 

0270  REM 

0280  DIM  D(255)  ,N$(8)  ,T(255)  ,M9(6)  ,T$(3) 

0290  STRING=  8 
0291  DIGITS=  4 
0292  T  $ ( 1 ) = " X " 

0293  T$ ( 2) =  "Y" 

0294  T  $ ( 3 ) = " Z " 

0295  LINE=  80 
0296  L7  =6 
0297  El=13  507 

0313  REM 

0325  REM  ********************************************** 


0326  REM  *  NOW  GET  FILENAME  FROM  MEMORY  &  PRINT  IT 
0327  REM  ********************************************** 
0328  REM 

0330  FOR  1=1  TO  8 

0340  J=13313+I 

0350  N$  ( I ) =CHR$ (PEEK ( J) ) 

0360  A$=A$+N$ ( I ) 

0370  NEXT  I 
0372  P$=CHR$ (12) 

0373  PRINT  P$ 

0374  PRINT 
0375  PRINT 
0376  PRINT 
0377  PRINT 
0378  PRINT 
03  80  PRINT 

0385  PRINT  "EKG  ENTROPY  CALCULATION" 

03  86  PRINT 
03  87  PRINT 

0390  PRINT  "FILENAME . ";A$ 

0400  PRINT 
0401  PRINT 
0402  GOSUB  1696 
0403  GOSUB  1900 

0404  IF  G$  =  "S"  THEN  GO  TO  1120 


ENTROPY 


C  41 0  REM 
0411  REM 

Cel'1 

C  41 3  i.LM 

0414  REM 
0415  REM 
0416  REM 
0417  REM 
0  419  REM 
0420  REM 
0421  REM 
0424  REM 
0425  REM 
0426  REM 
0427  REM 
0428  REM 
0429  B=13  856 

0430  Cl=l 
0432  N=PEEK (13500) 

0433  POKE (  B,  N) 

0435  FOR  1=1  TO  ^55 

0436  T ( I ) =0 

0437  NEXT  I 

0438  T9=0 

0439  S2=0 

0440  S=0 

0441  REM 

0442  REM  ************************************************* 

0443  REM  *  NOW  BEGIN  LOOP  TO  CALC  X,YrZ  &  TOTAL  ENTROPY 
0444  REM  ************************************************* 

0445  REM 

0450  IF  Cl  <>  1  THEN  GO  TO  480 
0460  K  =13  567 

0480  IF  Cl  <>  2  THEN  GO  TO  510 
0490  K=1407  9 

0510  IF  Cl  <>  3  THEN  GO  TO  540 
0520  K=14591 

0540  IF  Cl>=  4  THEN  GO  TO  800 
0542  REM 

0543  REM  ****************************************************** 

0544  REM  *  GET  2  BYTE  PDF  DATA  &  MERGE  INTO  FETING  POINT  NUMBER 
0545  REM  ***************************************************** 
0546  REM 

0550  FOR  1=1  TO  509  STEP  2 
0560  M= ( 1+1 ) /2 

0570  D(M) =256*PEEK (I+K) +PEEK (I+K+l) 

0572  T(M) =T(M) +D(M) 

0590  S=D(M)+S 
0592  S2=D (M) +S2 
0600  NEXT  I 

0605  D9=256*PEEK (K+511) +PEEK(K+512) 

0606  S=S+D9 
0607  T9=T9+D9 

0608  S2=S2+D9 


*  E1=MEU  FILE  El  FT  TEAT  1 0!  i  PC"  ARC  I  I  PI.TELTS 

*  13£56=$3620  ( LEE)  -PI./  E.LE  FELL  ui  BARIC.  DA  VA  iE  :'i 

*  13  56 7  =  3 4FF  (HEX)=XPDF  BUFFER-1 

*  1407  9  =  36 FF  ( HEX) =YPDF  BUFFER-1 

*  14591 =38FF  (HEX)=ZPDF  BUFFER-1 

*  13 500  =  3 4BC  (HEX) =BASSAV.  MEM  BUF  FOR  $3620  DATA  SAVE 


*  NOW  GET  VLU  IN  BASSAV  &  STR  TO  $3620  (HEX) 
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ENTROPY 


C-610  E  =  0 
0612  REM 

0613  RET*.  *****  **************************************  *  *.***•<**  +  ** 
0614  REM  *  NOW  CALCULATE  PROBABILITY  OF  OCCURENCE  C-i  5E  ACIDIC 

0615  REM  *  VLU'S  FROM  NUM  OF  OCCURENCES.  THEN  CALC  ENTROPY  SUM. 
0616  REM  ****************************************************** 
0617  REM 

0620  FOR  1=1  TO  255 

0630  D(1)=D(I)/S 

0640  IF  D ( I ) =0  THEN  GO  TO  660 

0650  E=E+(D(I) * {-( LOG ( D ( I ) J/.6  93147)  )  ) 

0660  NEXT  I 
0663  D9=D9/S 

0664  IF  D9=0  THEN  GO  TO  666 

0665  E=E+(D9*(-( LOG (D9)/.693147) ) ) 

0666  IF  E=0  THEN  GOTO  672 

0667  C  2  =  8/ E 

066  8  GOTO  6  83 

0672  C2=l 

067  3  GOTO  6  80 

0674  REM 

0675  REM  ****************************************************** 

0676  REM  *  PRINT  RESULTS  OF  CALC  TO  TERMINAL  (PRINTER). 

0677  REM  ****************************************************** 

067  8  REM 
06  80  PRINT 

0681  PRINT  "MAXIMUM  COMPRESSION  FOR  CHANNEL  ";T$(C1};"  IS  INFINITE" 
06  82  GOTO  6  90 
06  83  PRINT 

0684  PRINT  "MAX  COMPRESSION  RATIO  FOR  CHANNEL  ”;T$(Cl);n  IS  ";C2;" 
0690  PRINT 

0700  PRINT  "EKG  LEAD  ";T$(C1);"  ENTROPY  =  ";E;"  BITS." 

0710  PRINT 
0712  REM 

0713  REM  ************************************************** **v**** 
0714  REM  *  NOW  CONVERT  CALCULATED  ENTROPY  TO  ASCII  &  f'T’ORE  BACK 
0715  REM  *  IN  MEMORY  BUFFER 

0716  REM  ********************************************************* 
0717  REM 

0720  LET  E$=STR$ ( E) 

0740  GOSUB  1750 
07  85  C1=C1+1 

07  90  GOTO  440 
0800  REM 

0801  REM  ************************************ ******************** 
0802  REM  *  WITH  X,Y,Z  ENTROPY  CALCULATED,  NOW  CALCULATE  TOTAL , 

0803  REM  *  COMBINED  ENTROPY  BY  ADDING  X,Y,Z  BTN  COUNTS  &  DIVIDING 
0804  REM  *  BY  TOTAL  SAMPLE  COUNT 

0 80 5  REM  ******************************************************* 

0806  REM 

0807  E5=0 

0810  FOR  1=1  TO  255 

0820  T ( I ) =T ( I ) /S2 

0822  IF  T ( I ) =0  THEN  GO  TO  840 
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ENTROPY 


C  83  0  E5  =  E5  +  (T(I)*(-( LOG ( T { I ) )/. 693147) ) ) 

0840  NEXT  I 
(•  .1  'I"'  SI’ 

0  c32  IE  T 9  =  0  THEN  CO  70  07  i 

0860  E5=E5+(T9*(-( LOG (T9) / .693147) ) ) 

0870  C3  =  8/E5 
0  87  2  REM 

0873  REM  ******************************************************* 

0874  REM  *  PRINT  COMBINED  ENTROPY  TO  TERM  &  STR  RESULT  IN  MEM  BUFFER 
0875  REM  ******************************************************* 

0876  REM 
0  8  80  PRINT 

0890  PRINT  "MAX  COMPRESSION  RATIO  FOR  3  LEAD  EKG  SYSTEM  ";C3;"  :  1" 
0910  PRINT 

0920  PRINT  "3  LEAD  EKG  SOURCE  ENTROPY  =  ";E5;"  BITS." 

0930  PRINT 

0940  LET  E$=STR$(E5) 

0950  GOSUB  1750 
1000  LET  E$=STR$(C3) 

1005  GOSUB  1750 
1010  REM 

1020  REM  ********************************************** 

1030  REM  *  NOV?  GET  OTHER  STATISTICAL  VARIABLES  & 

1040  REM  *  CALCULATE  CHANNEL  MAX , MINS, COMPRESSION  RATIO 
1050  REM  *  OBTAINED,  AND  COMPRESSION  TIME  EFFICIENCY 
1060  REM  ********************************************** 

1070  REM 

1080  REM  ********************************************** 

1082  REM  *  START  WITH  ACHIEVED  COMPRESSION  RATIO.  THEN 

1090  REM  *  PRINT  THE  TIME  COMPRESSION  EFFICIENCY.  THIS  IS 

1091  REM  *  THE  PERCENTAGE  OF  THE  TIME  AVAL I ABLE  THAT  WAS  USED 

1092  REM  *  TO  COLLECT ,  COMPRESS ,  S-  CALCULATE  STAT  VARIABLES. 

1100  REM  ********************************************** 

1110  REM 

1120  DIGITS=  4 
1130  L7  =6 

1140  M4  =  PEEK (13483) +PEEK ( 13 4 82) *  256 +PEEK (134 81 ) *256*256 

1150  D4  =  PEEK  ( 1 3  4  87 )  -fPEEK  ( 1 3  4  06 )  *  256  +PEEK  ( 1 3  4  85)  *256*256 

116  0  D4  =  PEEK (13  4  84) *  256  *  256  *  256 +D4 

1170  C4=D4/M4 

1180  LET  E$=STR$ (C4) 

1190  GOSUB  1750 

1200  PRINT 

1201  PRINT  "COMPRESSION  RATIO  ACHIEVED  =  ” ;C4;"  :  1" 

1210  IF  G $  = " S "  THEN  GOTO  1260 

1211  REM 

1212  REM  ***********■**********************************>.** 

1213  REM  *  CALCULATE  OVERALL  COMPRESSION  EFFICIENCY 

1214  REM  ************************************************* 

1215  REM 

1216  DIGITS'-  1 

1217  C6=( (C4-1)/ (C3-1) ) *100 

1218  PRINT 

1219  PRINT  "ACHIEVED  COMPRESSION  EFFICIENCY  =  ";C6;"  5" 
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1220  LET  E$=STR$ (C6) 

1221  L7=4 

1222  COPER  1750 

1229  REM 

1230  REM  ************************************************ 
1240  REM  *  NOW  CALCULATE  COMPRESSION  TIME  EFFECI ENCY 
1250  REM  ********************************************* 

1252  REM 

1260  S4= PEEK (13461) +PEEK (13460)  *256 

1262  L4=PEEK (1346  2) 

126  4  L5=PEEK (13459) +PEEK(13  45  8) *256 +PEEK (13457)  *256*256 

1266  L5=PEEK (1 3  4  56 ) *256 *256 *256 +L5 

1270  T4=(1-(L5/(L4*S4) ) ) *100 

1272  DIGITS=  1 

1274  L7  =  4 

1276  LET  E$=STR$ (T4) 

1278  GOSUB  1750 
1280  PRINT 

1282  PRINT  "COLLECTION  TIME  EFFICIENCY  =  ";T4;"  %" 

1284  PRINT 

1290  REM 

1291  REM  ************************************************* 

1292  REM  *  CALCULATE  COLLECTION  DURATION 

1293  REM  ************************************************** 

1294  REM 

1295  T6=S4/S8 

1296  PRINT 

1297  PRINT  "COLLECTION  DURATION  =  "?T6;"  SECONDS" 

1298  PRINT  "AT  A  SAMPLE  RATE  OF  ";S8;"  HZ" 

1299  LET  E$=STR$ (T6) 

1300  GOSUB  1750 

1301  REM 

1302  REM  *********************************************** 
1310  REM  *  RETRIEVE  DATA  MAX  &  MINS  &  CALC  VOLTS 

1320  REM  ************************************************* 
1330  REM 

1339  DIGITS=  5 

1340  FOR  1=6  TO  1  STEP  -1 

1350  M9(I) =PEEK(13460+I*3) 

1360  IF  M9 ( I )  >  127  THEN  GOTO  1390 
1370  M9(I)=M9( I) *.0390625 

1380  GOTO  1400 

1390  M9( I ) =-(10-M9(I) *.0390625) 

1400  NEXT  I 

1401  El =13  40  8 

1402  FOR  14=5  TO  1  STEP  -2 

1403  LET  E$=STR$ (M9 ( 1 4)  ) 

1404  LI =1 

1405  GOSUB  1750 

1406  13=14+1 

1407  LET  E$=STR$ (M9 ( 13) ) 

1408  GOSUB  1750 

1409  NEXT  14 

1410  REM 
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ENTROPY 


1420  REM  ************************************************* 

1430  RFM  *  NOW  PRINT  MAX  &  MINS  TO  TERM  (PRINTER) 

1 4 ri  ; :  ************************************************* 

1450  REM 
1460  PRINT 

1470  FOR  1=1  TO  6  STEP  2 
1480  PRINT 

1490  PRINT  "CHANNEL  " ;T$ ( ( 1+1 ) /2) ; "  MINIMUM  =  ";M9(7-I);"  VOLTS." 
1500  PRINT 

1510  PRINT  "CHANNEL  " ;T$ ( ( 1+1) /2) ; "  MAXIMUM  =  ";M9(6-I);"  VOLTS." 
1520  PRINT 
1530  NEXT  I 
1540  REM 

1550  REM  ************************************************ 

1560  REM  *  FINISH  WITH  A  PRINT  OF  MUM  OF  BITS  USED  TO 
1570  REM  *  STORE  X , Y , Z  IN  MEM  WITH  THIS  COMPRESSION  TYPE 
1580  REM  ************************************************ 

1590  REM 

16  00  X3  =  PEEK  (13  4  90)  +PEEK  (13489)  * 256  +PEEK  ( 1 3 4  88)  * 2 56 * 2 56 
1610  Y3=PEEK (13  4  93) +PEEK (134  92) * 256 +PEEK ( 1 3 4 91 )  *256*256 
1620  Z3=PEEK (13496) +PEEK(13495) *  256 +PEEK ( 1 3 4 94) *256*256 
1630  T3  =PEEK (13  4  99) +PEEK(13498) * 256 +PEEK ( 1 3 4 97 )  *256*256 
1632  DIGITS=  0 
1640  PRINT 

1650  PRINT  "NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  =" ;X3 
1652  PRINT 

1660  PRINT  "NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =";Y3 
1662  PRINT 

1670  PRINT  "NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Z  =";Z3 
1672  PRINT 

1680  PRINT  "NUMBER  OF  BITS  USED  TO  STORE  TIME  =";T3 
1682  PRINT 
16  83  PRINT 
1690  GOTO  2000 
16  91  REM 

1692  REM  ************************************************* 

1693  REM  *  SUB  TO  PRINT  OUT  COMPRESSION  TYPE 

1694  REM  ************************************************* 

1695  REM 

1696  H=PEEK (13312) *256+PEEK (13313) 

1697  IF  H  =  2  0  0  3  5  THEN  H$(l)="NOT  COMP" 

1698  IF  H=20035  THEM  H$ ( 2) ="RESSED  " 

1699  IF  H  =  21 56  9  THEN  H$(l)="TOLAN  A  " 

1700  IF  H  =  21 56  9  THEN  H$(2)=" 

1701  IF  H  =  21 57 0  THEN  H$ ( 1 ) ="TOLAN  B  " 

1702  IF  H  =  21 57  0  THEN  H$ ( 2) =" 

1703  IF  H  =  17 4 87  THEN  H$(l)="DOWER  " 

1704  IF  H  =  17  4 87  THEN  H$(2)=" 

1705  IF  H  =  21 5 84  THEN  HS (1) ="TURNING  " 

1706  IF  H  =  21 5  84  THEN  H$(2)="POINT  " 

1707  IF  H=1 8766  THEN  H$(1)="2ND  ORD  " 

1708  IF  H=1 8766  THEN  H$ ( 2) ="INTERPOL" 

1709  PRINT  "COMPRESSION  USED . "  ;I1  $  ( 1)  ; H $  (  2) 

1710  PRINT 
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ENTROPY 


1711  RETURN 

1  *y  ^  A  T'  r»»* 

Y"  '  '  •k'k'k'k'k+.'k’kic’kle'kjc’k'k'kji'k'kic'k'kii-kA'k'k’k'k'r.i.i.  •k'k  +  'k'k-k'k'k'kir'k’k'k'k’k 

1732  REM  *  SUBROUTINE  TO  WRITE  ASCII  DATA  IN  ES  TO  MEN 

1733  REM  *  LOCATION  POINTED  TO  BY  El.  WILL  WRITE  8  CHAR 

1734  REM  *  STRINGS  TO  MEMORY. 

1739  REM  *********************************************** 

1740  REM 

1750  FOR  1=1  TO  L7 
1760  F$=MID$ ( E$ ,  I ,  L7 ) 

1770  F=ASC  (F$) 

17  80  POKE  (  El ,  F ) 

1781  El  =E1  +1 
1790  NEXT  I 

1800  POKE  (  El,  4) 

1801  El  =El  +1 
1810  RETURN 
1820  REM 

1830  REM  ********************************************* 

1840  REM  *  SUBROUTINE  TO  PROMPT  COMMAND  FOR  SHORT  RUN  OR  LONG 
1850  REM  *  RUN.  SHORT  DOES  NOT  CALCULATE  ENTROPY  OR  COMPRESSION 
186  0  REM  *  RATIOS. 

1870  REM  ******************************************************** 
1880  REM 
1900  PRINT 

1910  PRINT  "ENTER  S  FOR  SHORT  RUN  (MO  ENTROPY  CALCULATED)" 

1920  PRINT  "ENTER  L  FOR  LONG  RUN  (WITH  ENTROPY  CALCULATED)" 

1930  INPUT  G$ 

1932  PRINT  "ENTER  COLLECTION  SAMPLE  RATE  (IE.  500)" 

1934  INPUT  0$ 

1935  S8=VAL  (0$) 

1940  RETURN 
1950  REM 

1960  REM  ************************************************** 

1970  REM  *  END  OF  ENTROPY  CALCULATION  PROGRAM 
1 9 80  REM  *************************************************** 

1990  REM 
2000  PRINT 
2010  PRINT 

2020  PRINT  "ENTROPY  CALCULATION  &  STATISTICS  PRINTOUT  COMPLETE" 
2030  END 
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Appendix  D 

This  appendix  contains  a  listing  of  the  data  co; 

by  the  T0LAN-A8  module  for  the  thesis  experiment. 


ipr  c 
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EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE 
FILENAME . TA13  5  9PA 


CM”  'I  1 

*  *  *'  ■■  •  •  •  •  • 
SAMPLING  RATE  .  . 

DATE  OF  COLLECTION 
TIME  OF  COLLECTION 
COMPRESSION  USED. 
CHANNEL  X  ENTROPY 
CHANNEL  Y  ENTROPY 
CHANNEL  Z  ENTROPY 
TOTAL  SOURCE  ENTROPY 


PARNELL 
50  0  HZ 
23  OCT  80 
1359 
TOLAN-A 
2 . 4  87 1 
2.4751 
2.4217 
2.47  96 


BITS 

BITS 

BITS 

BITS 


PRESS  RETURN  FOR  PAGE  2  OF  STATISTI CS= 


1 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE . 

COMPRESSION  RATIO 

ACHIEVED . 

ACHIEVED  COMPRESSION 

EFFICIENCY . 

COMPRESSION  TIME 
EFFICIENCY  OBTAINED  .  .  . 
COLLECTION  DURATION  .  .  . 
CHANNEL  X  MAXIMUM  .  .  .  . 
CHANNEL  X  MINIMUM  .  .  .  . 
CHANNEL  Y  MAXIMUM  .  .  .  . 
CHANNEL  Y  MINIMUM  .  .  .  . 

CHANNEL  Z  MAXIMUM  .  .  .  . 
CHANNEL  Z  MINIMUM  .  .  .  . 

COMMENTS . 

PRESS  RETURN  FOR  PAGE  3  0 


3.2263 

:  1 

2.2595 

:  1 

56.5  % 

OF  MAXIMUM 

7  7.8  % 

SMP  INTERVAL 

26.2  SECONDS 

2.50000 

VOLTS 

-0.1171 

VOLTS 

2.50000 

VOLTS 

-0.1171 

VOLTS 

2.50000 

VOLTS 

-0.1562 

VOLTS 

X , Y , Z  IN 

COMMON  LEAD  1 

STATISTICS= 


EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPNO)=  3336  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  (LPCAL)=  27  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (LOOPCT)=  0001B9DB  (HEX) 

TIME  EFFICIENCY  -  ( 1- ( LOOPCTL ( SAMPNO*LPCAL) ) ) *100 

CHANNEL  MAXI  MUMS  AND  MINIMUMS 

XMAX=  40  (HEX)  AT  SAMPLE  NUMBER  0DA7  (HEX) 

XMIN  =  FD  (HEX)  AT  SAMPLE  NUMBER  0171  (HEX) 

YMAX  =  40  (HEX)  AT  SAMPLE  NUMBER  0DA7  (HEX) 

YMIN=  FD  (HEX)  AT  SAMPLE  NUMBER  0171  (HEX) 

ZMAX=  40  (HEX)  AT  SAMPLE  NUMBER  0DA7  (HEX) 

ZMIN=  FC  (HE::)  AT  SAMPLE  NUMBER  0171  (HEX) 

COMPRESSION  STATISTICS: 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  021FF0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEN  CODER  =  00040000  (HEX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  0004CD10  (HEX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  =  006652  (HEX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =  0066A8  (LUX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Z  =  006160  (10'. :) 

NUMBER  OF  BITS  USED  TO  STORE  TIME  OR  OTHER  PAR  M'FYI'i!  =  G1C00O  (HEX) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PER  MEM  HITS  AVAL I ABLE 
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FILE  TA1359PA 

V  AHPLTTI’EiE  tyistpt  button 


ftfl . 

. 00G0 

(LEX) 

R1 . 

. 0000 

(HEX) 

R? . 

. 0000 

(HEX) 

RR . 

. 0000 

(HEX) 

R4 . 

. 0000 

(HEX) 

RE . 

. 0000 

(HEX) 

Rfi  . 

. 0000 

(HEX) 

R7  . 

. 0000 

(HEX) 

Rfi  _  ... 

. 0000 

(HEX) 

RQ  . 

. 0000 

(HEX) 

RA . 

. 0000 

(HEX) 

RR . 

. 0000 

(HEX) 

RC . 

(HEX) 

Rn . 

. 0000 

(HEX) 

RF . 

. 0000 

(HEX) 

RF . 

.  0000 

(HEX) 

qO  . 

. 0000 

(HEX) 

ql . 

. 0000 

(HEX) 

q? . 

. 0000 

(HEX) 

qR  . 

. 0000 

(HEX) 

q4 . 

. 0000 

(HEX) 

qR . 

. 0000 

(HEX) 

96  ... 

. 0000 

(HEX) 

q7 . 

. 0000 

(HEX) 

qR . 

. 0000 

(HEX) 

qq . 

. 0000 

(HEX) 

qA . 

. 0000 

( F1EX ) 

qR . 

. 0000 

(HEX) 

qp . 

. 0000 

(HEX) 

qn . 

. 0000 

(HEX) 

qF. . 

(HEX) 

qF . 

. 0000 

(HEX) 

AO . 

. 0000 

(HEX) 

AI . 

. 0000 

(HEX) 

A  2 . 

. 0000 

(HEX) 

AR . 

. 0000 

(HEX) 

^4 . 

. 0000 

(HEX) 

A5 . 

. 0000 

(HEX) 

Afi . 

. 0000 

(HEX) 

A  7 . 

. 0000 

(HEX) 

A  R . 

. 0000 

(HEX) 

A  O  -  T  -  .  -  - 

. 0000 

(HEX) 

aa . 

. 0000 

(HEX) 

AR . 

. 0000 

(HEX) 

AC . 

. 0000 

(HEX) 

. 

. 0000 

(HEX) 

AF, . 

. 0000 

(HEX) 

AF . 

. 0000 

( nEX) 

RO . 

. 0000 

(  HEX) 

Rl . 

(HEX) 

B2 . 

. 0000 

(HEX) 
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B3 . 0000  (HEX) 

B4 . 0000  (HEX) 

B5 . 0000  (1EX) 

BG . 00  0  0  (HEX) 

R7 . 0000  (HEX) 

B8 . 0000  (HEX) 

B9 . 0  00  0  (HEX) 

BA . 0000  (HEX) 

BB .  0000  (HEX) 

BC . 0000  (HEX) 

BD .  0000  (HEX) 

BE . 0000  (HEX) 

BF . 0000  (HEX) 

CO . 0000  (HEX) 

Cl . 0000  (HEX) 

C2 . 00  0  0  (HEX) 

C3 . 0000  (HEX) 

C4 . 0000  (HEX) 

C5 . 0000  (HEX) 

C6 . 0000  (HEX) 

C7 . 0000  (HEX) 

C  8 . 0000  (HEX) 

C9 . 0000  (HEX) 

CA . 0000  (HEX) 

CB . 0000  (HEX) 

CC . 0000  (HEX) 

CD . 0000  (HEX) 

CE . ....0000  (HEX) 

CF . 0000  (HEX) 

DO . 0000  (HEX) 

D1 . 0000  (HEX) 

D2 . 0000  (HEX) 

D3 . 0000  (HEX) 

D4 . 0000  (HEX) 

D5 . 0000  (HEX) 

D6 . 0000  (HEX) 

D7 . 0000  (HEX) 

D8 . 0000  (HEX) 

D9 . 0000  (HEX) 

DA . 0000  (HEX) 

DB . 0000  (HEX) 

DC . 0000  (HEX) 

DD . 0000  (HEX) 

DE .  0000  (HEX) 

DF . 0000  (HEX) 

EO . 0000  (HEX) 

El . 0000  (HEX) 

E2 . 0000  (HEX) 

E3 . 0000  (HEX) 

E4 . 0000  (HEX) 

E5 . 0000  (HEX) 

EG . 0000  (HEX) 

F.7 . 0000  (HEX) 

E8 . 0000  (HEX) 
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F9 . 

.  0000 

(HEX) 

FA . 

. 0000 

(TEX) 

FF . 

. 0  0  0  0 

(!’>:) 

FC . 

. 0  0  0  c 

(c;:::) 

F.n . 

. 0000 

(HEX) 

F  F . 

.  0000 

(HEX) 

FF . 

.  0000 

(HEX) 

F  n . 

. 0000 

(  HEX) 

FI . 

. 0000 

(HEX) 

F  2 . 

. 0001 

(HEX) 

FI . 

. 0001 

(HEX) 

F  4  . . 

. .  . . .0003 

(HEX) 

F5 . 

. oooc 

(HEX) 

Ffi . 

. 0012 

(HEX) 

F7 . 

. 0016 

(HEX) 

FR  . 

. 000F 

(HEX) 

FQ . 

. oooc 

(HEX) 

FA  . 

. 000E 

(HEX) 

FR . 

. 000  E 

(HEX) 

FC . 

. 00113 

(HEX) 

FD . 

. 004D 

(HEX) 

FE . 

. 0260 

(HEX) 

FF . 

. 0  961 

(HEX) 

00 . 

. 06A2 

(HEX) 

01 . 

. 0  9A5 

(HEX) 

02 . 

. 0  24A 

(HEX) 

03 . 

. 005F 

(HEX) 

04 . 

. 0027 

(HEX) 

05 . 

. 0011 

(HEX) 

06 . 

. 0003 

(HEX) 

07 . 

. 0008 

(HEX) 

08 . 

. 0008 

(HEX) 

09 . 

. 0004 

(HEX) 

OA . 

.  0001 

(HEX) 

on . 

. 0001 

(HEX) 

oc . 

. 0006 

(HEX) 

OD . 

. 0003 

(HEX) 

OE . 

.  0003 

(HEX) 

OF . 

.  0  00A 

(HEX) 

10 . 

. 0009 

(HEX) 

]  1 . 

. 0000 

(HEX) 

12 . 

. 0003 

(HEX) 

13 . 

. 0002 

(HEX) 

14 .....  . 

. 0000 

(HEX) 

15 . 

. 0000 

(HEX) 

16 . 

. 0000 

(HEX) 

17 . 

. 0000 

(HEX) 

18 . 

. 0000 

(HEX) 

19 . 

. 0000 

(HEX) 

1  A . 

. 0000 

(HEX) 

1  R . 

. 0000 

(HEX) 

1C . 

.  0000 

(HEX) 

ID . 

. 0000 

(HEX) 

IE . 

. 0000 

(HEX) 
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IF . 0000  (HEX) 

20  . OOP''  (HEX) 

21  . 0000  (HEX) 

22  . 000  0  (HEX) 

23  . 0000  (HEX) 

24  . 0000  (HEX) 

25  . 0000  (HEX) 

26  . 0000  (HEX) 

27  . 0000  (HEX) 

28  . 0000  (HEX) 

29  . 0000  (HEX) 

2A .  0000  (HEX) 

2B . 0000  (HEX) 

2C .  0000  (HEX) 

2D . 0000  (HEX) 

2E . 0000  (HEX) 

2F . 0  000  (HEX) 

30  . 0000  (HEX) 

31  . 000  0  (HEX) 

32  . 0000  (HEX) 

33  . 0000  (HEX) 

34  . 0000  (HEX) 

35  . 0000  (HEX) 

36  . 0000  (HEX) 

37  . 0000  (HEX) 

38  . 0000  (HEX) 

39  . 0000  (HEX) 

3A . 0000  (HEX) 

3D . 0000  (HEX) 

3C . 0000  (HEX) 

3D . 0000  (HEX) 

3E . 0000  (HEX) 

3F . 0000  (HEX) 

40  . 0000  (HEX) 

41  . 0  000  (HEX) 

42  . 0000  (HEX) 

43  . 0000  (HEX) 

44  . 0000  (HEX) 

45  . 0000  (HEX) 

46  . 0000  (HEX) 

47  . 0000  (HEX) 

48  . 0000  (HEX) 

49  . 0000  (HEX) 

4A . 0000  (HEX) 

4B . 0000  (HEX) 

4C . 0000  (HEX) 

4D . 0000  (HEX) 

4E . 0000  (H  EX) 

4F . 000  0  (HEX) 

50  . 0000  (HEX) 

51  . 0000  (HEX) 

52  . 0000  (HEX) 

53  . 0000  (HEX) 

54  . 0000  (HEX) 
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55  0000  (HEX) 

56  *  . 0000  (HEX) 

Si’.'.'. . 0000  (HEX) 

5g  . 00  CO  (HEX) 

59*  . 0000  (HEX) 

5A  . 0000  (HEX) 

5B*  . 0000  (HEX) 

5  c" . 0000  (HEX) 

5D*  . 0000  (HEX) 

5E"  . 0000  (HEX) 

5p *  *  . 0000  (HEX) 

60  I  I . 0000  (HEX) 

61  . 0000  (HEX) 

62  *  . 0000  (HEX) 

63.* . 0000  (HEX) 

64  * . 0000  (HEX) 

65*’  . 0000  (HEX) 

66.*.* . 00  00  (HEX) 

67  . 0000  (HEX) 

68  . 0000  (HEX) 

69  . 0000  (HEX) 

6A  . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

6E . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

73  . 0000  (HEX) 

74  . 0000  (HEX) 

75  . 0000  (HEX) 

. . 0000  (HEX) 

77  . 0000  (HEX) 

. . 0000  (HEX) 

79 . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

7D  . 0000  (HEX) 

. . 0000  (HEX) 

7F . 0000  (HEX) 
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El  KG  SAMPLE  COLLECTION 
FILENAME . 

SUP  J ECT  . 


J.'Uti  i\niL  •  «  •  • 

DATE  OF  COLLECTION.  . 
TIME  OF  COLLECTION.  . 
COMPRESSION  USED.  .  . 
CHANNEL  X  ENTROPY  .  . 
CHANNEL  Y  ENTROPY  .  . 
CHANNEL  Z  ENTROPY  .  . 
TOTAL  SOURCE  ENTROPY. 
PRESS  RETURN  FOR  PAGE 


STATISTICS  :  PAGE  1 
.  .  TA1413LU 

.  .  LUTZ 

.  .  50C  HZ 

.  .  23  OCT  80 

.  .  1413 

.  .  TOLAN-A 

.  .  3  .7  826  BITS 

.  .  3.7950  BITS 

.  .  3.814  9  BITS 

.  .  3.8028  BITS 

2  OF  STATISTICS^ 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE .  2.1  036  :  1 

COMPRESSION  RATIO 

ACHIEVED . 1.2519  :  1 

ACHIEVED  COMPRESS! ON 

EFFICIENCY . 2  2.8  %  OF  MAXIMUM 

COMPRESSION  TIME 

EFFICIENCY  03TAINED  ...  95.4  %  SMP  INTERVAL 

COLLECTION  DURATION  .  .  .  14.5  SECONDS 
CHANNEL  X  MAXIMUM  .  .  .  .  1.79687  VOLTS 
CHANNEL  X  MINIMUM  ....  -1.0156  VOLTS 
CHANNEL  Y  MAXIMUM  ....  1.75781  VOLTS 
CHANNEL  Y  MINIMUM  ....  -1.0156  VOLTS 
CHANNEL  Z  MAXIMUM  .  .  .  .  1  .7  57  81  VOLTS 
CHANNEL  Z  MINIMUM  ....  -1.0156  VOLTS 
COMMENTS . X,Y,Z  IN  COMMON.  LEAD  1 


PRESS  RETURN  FOR  PAGE  3  OF  STATISTICS^ 


EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPNO)-  1C60  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  ( LPCAL ) -  27  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (LOOPCT)=  000031E3  (HEX) 

TIME  EFFICIENCY  =  ( 1- (LOOPCTT ( SAMPNO*LPCAL) ) ) *100 

CHANNEL  MAXIMUMS  AND  MINIMUMS 

XMAX=  2E  (HEX)  AT  SAMPLE  NUMBER  0E7F  (HEX) 

XMIN=  E6  (HEX)  AT  SAMPLE  NUMBER  11C4  (HEX) 

YMAX=  2D  (HEX)  AT  SAMPLE  NUMBER  0E7F  (HEX) 

YMIN  =  E6  (HEX)  AT  SAMPLE  NUMBER  11C4  (HEX) 

ZMAX=  2D  (HEX)  AT  SAMPLE  NUMBER  0E7F  (HEX) 

ZMIN=  E6  (HEX)  AT  SAMPLE  NUMBER  11C4  (HEX) 

COMPRESSION  STATISTICS: 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  021FF0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEN  CODER  =  00032740  (HEX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  0002A900  (HEX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  =  007786  (P’.X) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =  0077F8  (i "X, 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Z  =  00764C  (HUN) 

NUMBER  OF  BITS  USED  TO  STORE  TIME  OR  OTHER  PAT AX'  "’l  ■;  ~  0 CCA 50  (HEX) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PER  MEM  :  I'iS  AVAL  I  ABLE, 
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FILE  TA1413LU 

CHANNEL  X  AMPLITUDE  DISTRIBUTION 

IV.'  A  VALUE  MEMBER  OF  OCCURENCES 

80  . 0000  (HEX) 

81  . 0000  (HEX) 

82  . 0000  (HEX) 

83  . 0  000  (HEX) 

84  . 0000  (HEX) 

85  . 0000  (HEX) 

86  . 0000  (HEX) 

87  . 0000  (HEX) 

88  . 0000  (HEX) 

89  . 0000  (HEX) 

8A . 0000  (HEX) 

8B . 0000  (HEX) 

8C . 0000  (HEX) 

8D . 0000  (HEX) 

8E . 0000  (HEX) 

8F . 0000  (HEX) 

90  . 0000  (HEX) 

91  . 0000  (HEX) 

92  . 0000  (HEX) 

93  . 0000  (HEX) 

94  . 0000  (HEX) 

95  . 0000  (HEX) 

96  . 0000  (HEX) 

97  . 0000  (HEX) 

98  . 0000  (HEX) 

99  . 0000  (HEX) 

9A . 0000  (HEX) 

9B . 0000  (HEX) 

9C . 0000  (HEX) 

9D . 0000  (HEX) 

9E . 0000  (HEX) 

9F . 0000  (HEX) 

AO . 0000  (HEX) 

A1 . 0000  (HEX) 

A2 . 0000  (HEX) 

A3 . 0000  (HEX) 

A4 . 0000  (HEX) 

A5 . 0000  (HEX) 

A6 . 0000  (HEX) 

A 7 . 0000  (HEX) 

A8 . 0000  (HEX) 

A9 . 0000  (HEX) 

AA . 0000  (HEX) 

AB . 0000  (HEX) 

AC . 0000  (HEX) 

AD.., . 0000  (HEX) 

AE . 0000  (HEX) 

AF . 0000  (HEX) 

BO . 0000  (HEX) 

B1 . ,.0000  (HEX) 

B2 . 0000  (HEX) 
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B3 . 

(HEX) 

B4 . 

(HEX) 

P>5 . 

(LEX) 

B6 . 

(HEX) 

B7 . 

(HEX) 

B8 . 

(HEX) 

B9 . 

. 0000 

(HEX) 

BA . 

. 0000 

( HEX ) 

BB . 

. 0000 

(HEX) 

BC . 

. 0000 

(HEX) 

BD . 

(HEX) 

BE . 

. 0000 

(HEX) 

BF . 

(HEX) 

CO . 

(HEX) 

Cl . 

(HEX) 

C2 . 

. 0000 

(HEX) 

C3 . 

. 0000 

(HEX) 

C4 . 

. 0000 

(HEX) 

C5 . 

(HEX) 

C6 . 

. 0000 

(HEX) 

C7 . 

. 0000 

( HEX ) 

C8 . 

(HEX) 

C9 . 

(HEX) 

CA . 

. 0000 

(HEX) 

CB . 

(HEX) 

CC . 

(HEX) 

CD . 

(HEX) 

CE . 

(HEX) 

CF . 

(HEX) 

DO . 

(HEX) 

Dl . 

(HEX) 

D2 . 

(HEX) 

D3 . 

(HEX) 

D4 . 

(HEX) 

D5 . 

(HEX) 

D6 . 

(HEX) 

D7 . 

. 0000 

(HEX) 

D8 . 

( HEX ) 

D9 . 

(HEX) 

DA . 

(HEX) 

DB . 

(HEX) 

DC . 

(HEX) 

DD . 

(HEX) 

DE . 

. 0000 

(HEX) 

DF . 

(HEX) 

EO . 

. 0000 

(HEX) 

El . 

. 0000 

(HEX) 

E2 . 

(HEX) 

E3 . 

(HEX) 

E4 . 

(HEX) 

E5 . 

(HEX) 

E6 . 

(HEX) 

E7 . 

(HEX) 

E8 . 

(HEX) 
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R9 . 

. 0000 

(BEX) 

A . 

. 0001 

( HFX ) 

. 0  0  ^  V 

( 

EC  t .  .  .  •  . 

. 0000 

(hex) 

RD . 

. 0000 

(HEX) 

R  R, . 

. 0000 

(HEX) 

RR . 

. 0001 

(HEX) 

FR . 

. 0000 

(HEX) 

Rl  . 

. 0000 

(HEX) 

F  2 . 

. 0001 

(HEX) 

F3 . 

. 0006 

(HEX) 

p  4 . 

. 0007 

(HEX) 

F6 . 

. 0012 

(HEX) 

f6 . 

. 0012 

(HEX) 

F7 . 

. 0022 

(HEX) 

F  R . 

. 0035 

(HEX) 

Fq . 

. 0050 

(HEX) 

FA  . 

. 0082 

(HEX) 

FR . 

. OOCC 

(HEX) 

FC . 

. 0136 

(HEX) 

FD . . 

. 01D9 

(HEX) 

FF, . 

. 02EF 

(HEX) 

FF . 

. 03D0 

(HEX) 

no . 

. 0164 

(HEX) 

01 . 

. 0  40A 

(HEX) 

0? . 

. 02BB 

(HEX) 

03 . 

(HEX) 

04 . 

. 0132 

(HEX) 

05 . 

. 00  AD 

(HEX) 

06 . 

. 0  06B 

(HEX) 

07 . 

. 0058 

(HEX) 

OR . 

. 0041 

(HEX) 

09 . 

. 001F 

(HEX) 

OA . 

. 0015 

(HEX) 

OR . 

. 0013 

(HEX) 

oc . 

. OOOC 

(HEX) 

on . 

. 000A 

(HEX) 

OE . 

. 0002 

(HEX) 

OF . 

. 0002 

(HEX) 

10 . 

. 0000 

(HEX) 

11 . 

. 0000 

(HEX) 

12 . 

. 0001 

(HEX) 

13  .....  . 

. 0000 

(HEX) 

14 . 

. 0000 

(HEX) 

15 . 

. 0000 

(HEX) 

16 . 

. 0000 

(HEX) 

17 . . 

. 0001 

(HEX) 

18 . 

. 0000 

(HEX) 

19 . 

. 0000 

(HEX) 

1A . 

. 0000 

(HEX) 

IB . 

. 0000 

(HEX) 

1  r . 

. 0000 

( HEX ) 

ID . 

. 0000 

(HEX) 

IE . 

. 0000 

(HEX) 
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IF . 0000  (HEX) 

20  . o  * )  r  o  c  ::) 

21  . oui.o 

22  . 0000  (HEX) 

23  . 0000  (HEX) 

24  . 0000  (HEX) 

25  . 0000  (HEX) 

26  . 0000  (HEX) 

27  . 0000  (HEX) 

28  . 0000  (HEX) 

29  . 0000  (HEX) 

2A . 0000  (HEX) 

2B . 0000  (HEX) 

2C . 0000  (HEX) 

2D . 0000  (HEX) 

2E . 0000  (HEX) 

2F . 0000  (HEX) 

30  . 0000  (HEX) 

31  . 0000  (HEX) 

32  . 0000  (HEX) 

33  . 0000  (HEX) 

34  . 0000  (HEX) 

35  . 0000  (HEX) 

36  . 0000  (HEX) 

37  . 0000  (HEX) 

38  . 0000  (HEX) 

39  . 0000  (HEX) 

3A . 0000  (HEX) 

3B . 0000  (HEX) 

3C . 0000  (HEX) 

3D . 0000  (HEX) 

3E . 0000  (HEX) 

3F . 0000  (HEX) 

40  . 0000  (HEX) 

41  . 0000  (HEX) 

42  . 0000  (HEX) 

43  . 0000  (HEX) 

44  . 0000  (HEX) 

45  . 0000  (HEX) 

46  . 0000  (HEX) 

47  . 0000  (HEX) 

48  . 0000  (HEX) 

49  . 0000  (HEX) 

4A . 0000  (HEX) 

4B . 0000  (HEX) 

AC . C900  (HEX) 

4D . 0000  (HEX) 

4E . 0000  (HEX) 

4F . 0000  (HEX) 

50  . 0000  (HEX) 

51  . 0000  (HEX) 

52  . 0000  (HEX) 

53  . 0000  (HEX) 

54  . 0000  (HEX) 
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55  0000  (HEX) 

56  ] . 0000  (HEX) 

r  7  ’  * . o  o  o  o 

56.*!!! . 0000  ii,.0 

59  0000  (HEX) 

5A  . 0000  (HEX) 

5B*  . 0000  (HEX) 

5C*  . 0000  (HEX) 

5D* . 0000  (HEX) 

5E* . 0000  (HCX) 

5P  *  . 0000  (HEX) 

60! . 0000  (HEX) 

61  . 0000  (HEX) 

62*  . 0000  (HEX) 

63  . 0000  (HEX) 

64" . 0000  (HEX) 

65*’  . 0000  (HEX) 

66!!.. . 0000  (HEX) 

67  . 0000  (HEX) 

68  . 0000  (HEX) 

69  . 0000  (HEX) 

6A  . 0000  (HEX) 

6B  . 0000  (HEX) 

6C . 0000  (HEX) 

6D  . 0000  (HEX) 

6E . 0000  (HEX) 

6F . 0000  (HEX) 

70  . 0000  (HEX) 

71  . 0000  (HEX) 

72  . 0000  (HEX) 

73  . 0000  (HEX) 

. . 0000  (HEX) 

75  . 0000  (HEX) 

76  . 0000  (HEX) 

77  . 0000  (HEX) 

78...., . 0000  (  Hi  EX ) 

. . 0000  (HEX) 

7A . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

. . 0000  (HEX) 

7E . 0000  (HEX) 

7F  .  ! . 0000  (HEX) 
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EKG  SAMPLE  COLLECTION 

STATISTICS 

:  PAGE  1 

FTIFNAMF . 

•  • 

TA1448L 

SAMPLING  RATE  .... 

•  • 

:>oc  l;; 

DA-TE  OF  COLLECTION.  . 

•  • 

2  3  OCT 

80 

TIME  OF  COLLECTION.  . 

•  • 

1449 

COMPRESSION  USED.  .  . 

•  • 

TOLAN-A 

CHANNEL  X  ENTROPY  .  . 

•  • 

2.9299 

BITS 

CHANNEL  Y  ENTROPY  .  . 

•  • 

2.9243 

BITS 

CHANNEL  Z  ENTROPY  .  . 

•  • 

2.9564 

BITS 

TOTAL  SOURCE  ENTROPY. 

•  • 

2.9436 

BITS 

PRESS  RETURN  FOR  PAGE 

2  OF  STATISTICS= 

EKG  SAMPLE  COLLECTION 

STATISTICS 

:  PAGE  2 

APPROX  MAX  COMPRESSION 
RATIO  POSSIBLE.  .  .  . 

•  • 

2.7176 

:  1 

COMPRESSION  RATIO 
ACHIEVED . 

•  • 

1.6008 

:  1 

ACHIEVED  COMPRESSION 
EFFICIENCY . 

•  • 

34.9  % 

OF  MAXIMUM 

COMPRESSION  TIME 
EFFICIENCY  OBTAINED  . 

•  « 

90.6  % 

SMP  INTERVAL 

COLLECTION  DURATION  . 

«  • 

18.5  SECONDS 

CHANNEL  X  MAXIMUM  .  . 

•  • 

1 .7  96  87 

VOLTS 

CHANNEL  X  MINIMUM  .  . 

•  • 

-0.7421 

VOLTS 

CHANNEL  Y  MAXIMUM  .  . 

•  • 

1 .7  96  87 

VOLTS 

CHANNEL  Y  MINIMUM  .  . 

•  • 

-0.7421 

VOLTS 

CHANNEL  Z  MAXIMUM  .  . 

•  • 

1  .7  96  87 

VOLTS 

CHANNEL  Z  MINIMUM  .  . 

•  • 

-0.7812 

VOLTS 

COMMENTS . 

•  ■ 

X  ,  Y ,  Z  IN  COMMON.  LEAD 

PRESS  RETURN  FOR  PAGE  3  OF  STATISTICS^ 


EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPNO)=  2448  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  (LPCAL)=  27  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (I,OOPCT)=  C000845C  (HEX) 

TIME  EFFICIENCY  =  (l-(  LOOPCT*;.  (  SAMFNO* Ll-'CAL )  )  )  *100 

CHANNEL  MAXIHUMS  AND  MIXIMUMS 

XMAX=  2E  (HEX)  AT  SAMPLE  MUMPER  0D0A  (HEX) 

XMIN=  ED  (HEX)  AT  SAMPLE  NUMBER  1D0A  (HEX) 

YMAX=  2E  (HEX)  AT  SAMPLE  NUMBER  ODOA  (HEX) 

YMIN=  ED  (HEX)  AT  SAMPLE  NUMBER  1D0A  (!’EX) 

ZMAX=  2 E  (HEX)  AT  SAMPLE  NUMBER  ODOA  (HEX) 

ZMIN=  EC  (HEX)  AT  SAMPLE  NUMBER  1D0A  (HEX) 

COMPRESSION  STATISTICS : 

NUMBER  OF  MEMORY  HITS  AVAILABLE  =  021 FEO  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  I,EN  CODER  =  00 03 A*  •i;  (HEX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  000366C0  (HEX) 


NUMBER 

OF 

B I TS 

USED 

TO  STORE 

CHANNEL  X  =  006 9AA  ( 

MMX) 

NUMBER 

OF 

BITS 

USED 

TO  STORE 

CHANNEL  Y  =  006 93 E  ( 

:  ' ) 

NUMBER 

OF 

BITS 

USED 

TO  STORE 

CHANNEL  Z  -  006739  ! 

;  •  xi 

NUMBER 

OF 

BITS 

USED 

TO  STORE 

TIME  OR  OTHER  PAR  A  Ml" 

rM  i:  - 

00PB98  (HEX 

COHERES 

SION  RATIO  = 

TOTAL  DATA  BITS  STORLD  HER  ME; 

M  PIT 

S  AVAL! ABLE 

219 


FILE  TA1448LT 

CHANNEL  X  AMPLITUDE  DISTRIBUTION 


. core 

81 . 

. 0000 

(HEX) 

82 . 

. 0000 

(HEX) 

83 . 

. 0000 

(HEX) 

84 . 

. 0000 

(HEX) 

85 . 

. 0000 

(HEX) 

86 . 

. 0000 

(HEX) 

87 . 

. 0000 

(HEX) 

88 . 

. 0000 

(HEX) 

89 . 

. 0000 

(HEX) 

8A . 

. 0000 

(HEX) 

8B . 

.  0000 

(HEX) 

8C . 

. 0000 

(HEX) 

8n . 

. 0000 

(HEX) 

8E . 

. 0000 

(HEX) 

RF  . 

.  0000 

( HEX ) 

90 . 

. 0000 

(HEX) 

91 . 

. 0000 

(HEX) 

92 . 

. 0000 

(HEX) 

93 . 

. 0000 

(hex) 

94 . 

. 0000 

(HEX) 

95 . 

. 0000 

(HEX) 

96 . 

. 0000 

(HEX) 

97 . 

. ooco 

(HEX) 

98 . 

. 0000 

(HEX) 

99 . 

.  0000 

(HEX) 

9A . 

. 0000 

(HEX) 

9R . 

. 0000 

(HEX) 

9C . 

. 0000 

(HEX) 

9n . 

.  0000 

(HEX) 

9E . 

. ooco 

(HEX) 

9F . 

. 0000 

(HEX) 

AO . 

. 0000 

(HEX) 

A1 . 

. 0000 

(HEX) 

A2 . 

. 0  0  0  0 

(HEX) 

A3 . 

. 0000 

(HEX) 

A4 . 

. 0000 

(HEX) 

A5 . 

. 00  0  0 

(HEX) 

A6 . 

. 00  00 

(HEX) 

A  7 . 

. 0000 

(HEX) 

A8 . 

. 0000 

(HEX) 

A9 . 

. 0000 

(HEX) 

AA . 

. 0000 

(HEX) 

AB . 

. 0000 

(HEX) 

AC . 

. 0000 

(HEX) 

AD . 

. 0000 

(HEX) 

AE . 

. 0000 

(  HEX) 

AF . 

. 0000 

(HEX) 

BO . 

. 0000 

(  HEX) 

B1 . 

B2 . 

. 0000 

(HEX) 

(HEX) 
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B3 . 

. . . . . .0000 

(HEX) 

R4 . 

. 0000 

(HEX) 

i  '•••••• 

n  n  p  n 

c  "} 

i'b . 

. Ol'UH. 

(.  ..) 

B7 . 

. 0000 

(HEX) 

B8 . 

. 0000 

(HEX) 

B9 . 

. 0000 

(HEX) 

BA . 

. 0000 

(HEX) 

BB . 

. 0000 

(HEX) 

BC . 

. 0000 

(HEX) 

BD . 

. 0000 

(HEX) 

BE . 

. 0000 

(HEX) 

BF . 

. 0000 

(HEX) 

CO . 

. 0000 

(HEX) 

Cl . 

. 0000 

(HEX) 

C2 . 

. 0000 

(HEX) 

C3 . 

. 0000 

(HEX) 

C4 . 

. 0000 

(HEX) 

C5 . 

. 0000 

(HEX) 

C6 . 

. 0000 

(HEX) 

Cl . 

. 0000 

(HEX) 

C  8 . 

. 0000 

(HEX) 

C9 . 

. 0000 

(HEX) 

CA . 

. 0000 

(HEX) 

CB . 

. 0000 

(HEX) 

CC . 

. 0000 

(HEX) 

CD . 

. 0000 

(HEX) 

CE . 

. 0000 

(HEX) 

CF . 

. 0000 

(HEX) 

DO . 

. 0000 

(HEX) 

D1 . 

. 0000 

(HEX) 

D2 . 

. 0000 

(HEX) 

D3 . 

. 0000 

(HEX) 

D4 . 

. 0000 

(HEX) 

D5 . 

. 0000 

(HEX) 

D6 . 

. 0000 

(HEX) 

D7 . 

. 0000 

(HEX) 

D8 . 

. ooco 

(HEX) 

D9 . 

. 0000 

(HEX) 

DA . 

. 0000 

(HEX) 

DB . 

. 0000 

(HEX) 

DC . 

. 0000 

(HEX) 

DD . 

. 0000 

(HEX) 

DF, . 

. 0000 

(HEX) 

DF . 

. 0000 

(HEX) 

EO . 

. 0000 

(HEX) 

El . 

. 0000 

(HEX) 

E2 . 

. 0000 

(HEX) 

E3 . 

. 0000 

(HEX) 

E4 . 

. 0000 

(HEX) 

F,5 . 

. 0000 

(HEX) 

E6 . 

. 0000 

( HEX) 

E7 . 

. 0000 

(HEX) 

E8 . 

. 0000 

(HEX) 
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EDO  .  .  .  . 

. . 0000 

(HEX) 

p  A  .  .  .  . 

.  .  .0000 

( HEX) 

0  ^  C  0 

/  -  •  «  1 

\ 

V  ■  -  1 

pn  .  .  „ 

.  .  .  .0000 

( HEX) 

rr  .  .  . 

.  .  .0000 

(HEX) 

V  P  .  _  . 

.  .  .0000 

(HEX) 

P  f\  .  -  . 

. . .0000 

(HEX) 

Pi  .  „  . 

.  .  .0000 

(HEX) 

P  0  ... 

. . .0000 

(HEX) 

V'X  _  .  . 

. . .0000 

(HEX) 

V  A  .  .  . 

. . .0000 

(HEX) 

pc;  .  .  .  . 

. . .0000 

(HEX) 

PA  .  .  . 

. . .0002 

(HEX) 

P  '7  .  .  . 

.  .  .0001 

(HEX) 

P  Q  .  .  . 

.  .  .0003 

(HEX) 

p  G 

.  .  .  .0007 

(HEX) 

.  .  .001C 

(HEX) 

pn  .  . 

...  .0034 

(HEX) 

p  r  .  . 

.  .  .  .00  8F 

(HEX) 

pp>  .  . 

. 0180 

(HEX) 

pp 

.  .  . . 03F7 

(HEX) 

pp  .  .  , 

. . . 06 A2 

(HEX) 

_ 03  OD 

(HEX) 

01 

02 


.0714 

.03F0 


. . 01  0A 


(HEX) 

(HEX) 

(HEX) 


. . 

Os  . 002A 

06 : : : . o°13 

07 . 

08 . 

09 . 

. . 

OB . 

. . 

. . 

OE . . 

OF . . 

10 . 

11 . 

12 . 

13  . 

14  . 

15  . 

16  . 

17  . 

18  . 

19 . 

. . 

IB . 

1C . 

ID . 

IF, . 


008A  (HEX) 


,0006 
.0002 
.0002 
.0002 
.0000 
.0000 
.0000 
.  0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
.0000 
,  .0000 

,  .0000 

,  .0000 

.  .0000 

.  .0000 

.  .0000 

.  .0000 

.  .0000 


(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 

(HEX) 
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IF . 

. 0000 

(HEX) 

?n . 

. onno 

r  ■  ■'  •.  ■ 

( r.rv  ^ 

/  •  ■  •  ' 

22 . 

. 0000 

U~a) 

23.  ....  . 

. 0000 

(HEX) 

24 . 

. 0000 

(HEX) 

25 . 

. 0000 

(HEX) 

26 . 

. 0000 

(HEX) 

27 . 

. 0000 

(HEX) 

28 . 

. 0000 

(HEX) 

29 . 

. 0000 

(HEX) 

2A . 

. 0000 

(HEX) 

2B . 

. 0  0  0  0 

(HEX) 

2C . 

. ocoo 

(HEX) 

2D . 

.  0000 

(HEX) 

?  F. . 

.  0000 

(Hi  EX) 

2F . 

.  0000 

(HEX) 

30 . 

. 0000 

(  HEX) 

31 . 

.  0000 

(HEX) 

32 . 

.  0000 

(HEX) 

33 . 

.  0000 

(HEX) 

34 . 

. 0000 

(HEX) 

35 . 

. 0000 

(HEX) 

36 . 

. 0000 

(HEX) 

37 . 

. 0000 

(HEX) 

38 . 

. 0000 

(HEX) 

39 . 

. 0000 

(HEX) 

3A . 

. 0000 

(HEX) 

3B . 

. 0000 

(HEX) 

3C . 

. 0000 

(HEX) 

3D . 

. 0000 

(HEX) 

3E . 

. 0000 

(HEX) 

3F . 

. 0000 

(HEX) 

40 . 

. 0000 

(HEX) 

41 . 

. 0000 

(HEX) 

42 . 

. 0000 

(HEX) 

43 . 

. 0000 

(HEX) 

44 . 

. 0000 

(HEX) 

45 . 

. 0000 

(HEX) 

46 . 

. 0000 

(HEX) 

47 . 

. 0000 

(HEX) 

48 . 

. 0000 

(HEX) 

49 . 

. 0  0  0  0 

(HEX) 

4A . 

(HEX) 

4B . 

. 0000 

(HEX) 

4C . 

.  0000 

(HEX) 

4D . 

. 0000 

(HEX) 

4E . 

. 0000 

(HEX) 

4F . 

. ooco 

(HEX) 

50 . 

. 0000 

(HEX) 

51 . 

. 0  0  0  0 

(HEX) 

52 . 

(HEX) 

53 . 

. 0000 

(HEX) 

54 . 

(HEX) 
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^5 . 0000  (  HEX ) 

56  . 0000  (  HEX) 

57  . oooo  ( r.i;v.) 

c 8 . ooro 

59  . 000  G  (HEX) 

5A . 0000  (HEX) 

5B . 0000  (HEX) 

5C . 0000  (HEX) 

5D . 00C0  (HEX) 

. . 0000  (HEX) 

5F . 0000  ( HEX ) 

60  . 0000  (HEX) 

61  . 0000  (HEX) 

62  . 0000  (HEX) 

63  . 0000  (HEX) 

64  . 0000  (HEX) 

65  . 0000  (HEX) 

66  . 0000  (HEX) 

67  . COCO  (HEX) 

68  . 0000  (HEX) 

69  . 0000  (HEX) 

6A . 0000  (HEX) 

6B . 0000  (HEX) 

6C .  0000  (HEX) 

6D .  0000  (HEX) 

6  E . 0000  (HEX) 

6F . 0000  (HEX) 

70  . 0000  (HEX) 

71  . 0000  (HEX) 

72  . 0000  (HEX) 

73  . 0000  (HEX) 

74  . 0000  (HEX) 

75  . 0000  (HEX) 

76  . 0000  ihLX) 

77  . 0000  (HEX) 

78  . 0000  (HEX) 

79  . 0000  (HEX) 

7  A . 0000  (HEX) 

7B . 0000  (HEX) 

7C . 0000  (HEX) 

7D . 0000  (HEX) 

7E . 0000  (HEX) 

7F . 0000  (HEX) 
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EKG  SAMPLE  COLLECTION 

STATISTICS 

:  PACE 

FILENAME . 

u'iilj  i  lx  vj  KmT  r,  •  •  •  • 

*  • 

TA1545T 

•  * 

•  • 

50(j 

DATE  OF  COLLECTION.  . 

•  • 

2  3  OCT 

80 

TIME  OF  COLLECTION.  . 

•  • 

1546 

COMPRESSION  USED.  .  . 

•  • 

TOLAN-A 

CHANNEL  X  ENTROPY  .  . 

•  • 

3 .2801 

BITS 

CHANNEL  Y  ENTROPY  .  . 

•  • 

3.2716 

BITS 

CHANNEL  Z  ENTROPY  .  . 

•  • 

3.3188 

BITS 

TOTAL  SOURCE  ENTROPY. 

•  • 

3.3026 

BITS 

PRESS  RETURN  FOR  PAGE  2  OF  STATISTICS= 

EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE.  .  .  . 

COMPRESSION  RATIO 

• 

2.4223 

:  1 

ACHIEVED . 

ACHIEVED  COMPRESSION 

• 

* 

1.3617 

:  1 

EFFICIENCY . 

COMPRESSION  TIME 

• 

• 

2  5.4  % 

OF  MAXIMUM 

EFFICIENCY  OBTAINED  . 

• 

• 

93.9  % 

SMP  INTERVAL 

COLLECTION  DURATION  . 

• 

• 

15.8  SECONDS 

CHANNEL  X  MAXIMUM  .  . 

• 

• 

3 .59375 

VOLTS 

CHANNEL  X  MINIMUM  .  . 

• 

• 

-1.4453 

VOLTS 

CHANNEL  Y  MAXIMUM  .  . 

• 

• 

3 .59375 

VOLTS 

CHANNEL  Y  MINIMUM  .  . 

• 

• 

-1.4453 

VOLTS 

CHANNEL  Z  MAXIMUM  .  . 

• 

• 

3.55  46  8 

VOLTS 

CHANNEL  Z  MINIMUM  .  . 

• 

• 

-1.4453 

VOLTS 

COMMENTS . 

« 

• 

X,Y,Z, 

IN  COMMON,  LEAD 

PRESS  RETURN  FOR  PAGE 

3 

OF 

STATISTICS= 

EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  ( SAMPNO) =  1  EDO  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  (LPCAL)=  26  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (I.,OOPCT)=  0000470E  (HEX) 

TIME  EFFICIENCY  =  ( 1- ( LCOPCT% ( SAMPMO*LPCAL) ) ) *1 00 

CHANNEL  MAXI MUMS  AND  MINIMUMS 

XMAX=  5C  (HEX)  AT  SAMPLE  NUMBER  03DD  (HEX) 

XMIN=  DB  (HEX)  AT  SAMPLE  NUMBER  145D  (HEX) 

YMAX=  5C  (HEX)  AT  SAMPLE  NUMBER  03DD  (HEX) 

YMIN-  DB  (HEX)  AT  SAMPLE  NUMBER  1 4 5D  (HEX) 

ZMAX  =  5B  (HEX)  AT  SAMPLE  NUMBER  03DD  (HEX) 

ZMIN~  DB  (HEX)  AT  SAMPLE  NUMBER  145D  (HEX) 

COMPRESSION  STATISTICS : 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  021FF0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEN  CODER  =  00034  :  -'0  (HEX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  0002E4B8  (HEX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  =  007  IDF  (i  MM:) 

NUMBER  OF  BTTS  USED  TO  STORE  CHANNEL  Y  =  007199  (MEN) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Z  »  007013  (!  M) 

NUMBER  OF  BITS  USED  TO  STORE  TIME  OR  OTHER  PARAMLT! R  =  00D220  (HEX) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PER  MEM  BITS  AVAL 1 ABLE 
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EKG  SAMPLE  COLLECTION 

STATISTICS  : 

I  Avj  I 

FILENAME . 

• 

.  TA154RT 

S.....Lji..C  i : . 

*  J  1/  .  . 

DATE  OF  COLLECT  IO!3 .  . 

.  23  OCT  80 

TIME  OF  COLLECTION.  . 

.  3  54  8 

COMPRESSION  USED.  .  . 

.  TO LAN -A 

CHANNEL  X  ENTROPY  .  . 

.  3.0171 

BITS 

CHANNEL  Y  ENTROPY  .  . 

.  3.0114 

BITS 

CHANNEL  Z  ENTROPY  .  . 

.  3.0373 

BITS 

TOTAL  SOURCE  ENTROPY. 

.  3.0355 

BITS 

PRESS  RETURN  FOR  PAGE 

2 

OF  STATISTICS3 

1 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE . 2.6354  :  1 

COMPRESSION  RATIO 

ACHIEVED .  1.4  99  8  :  1 

ACH I  EVE  I)  COM  PR  ESS  ION 

EFFICIENCY . 3  0.5  %  OF  MAXIMUM 

COMPRESSION  TIME 

EFFICIENCY  OBTAINED  .  .  .  91.4  5  SMP  INTERVAL 

COLLECTION  DURATION  .  .  .  17.4  SECONDS 

CHANNEL  X  MAXIMUM  ....  2.77343  VOLTS 

CHANNEL  X  MINIMUM  ....  -1.3671  VOLTS 

CHANNEL  Y  MAXIMUM  ....  2.73437  VOLTS 

CHANNEL  Y  MINIMUM  ....  -1.3671  VOLTS 

CHANNEL  Z  MAXIMUM  ....  2.73437  VOLTS 

CHANNEL  Z  MINIMUM  ....  -1.3673  VOLTS 

COMMENTS . X,Y,Z  IN  COMMON,  LEAD  AVL 


PRESS  RETURN  FOR  PAGE  3  OF  STATISTICS3 

EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  ( SAMPHO) =  21 FE  (LEX) 

MAXIMUM  'LOOP  COUNT  PER  INTERRUPT  (LPCAL)=  27  (HEX) 

TOTAL  WAITING  LOOP  'COUNTS  DURING  COLLECTION  (LOOPCT)=  00007134  (HEX) 

TIME  EFFICIENCY  =  ( 1- ( LOO?CT% ( SAMFMO*LPCAL) ) ) *100 

CHANNEL  MAXIMUMS  AND  MINIMUMS 

XMAX-  47  (HEX)  AT  SAMPLE  NUMBER  0A9E  (HEX) 

XM IN=  DD  (HEX)  AT  SAMPLE  NUMBER  1447  (HEX) 

YMAX=  46  (HEX)  AT  SAMPLE  NUMBER  095 A  (HEX) 

YMIN  =  DD  (HEX)  AT  SAMPLE  NUMBER  1447  (HEX) 

ZMAX  =  46  (HEX)  AT  SAMPLE  NUMBER  0  95  A  ( ERX ) 

Z M I M  =  DD  (HEX)  AT  SAMPLE  NUMBER  1  447  ( EEX) 

COMPRESSION  STATISTICS : 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  023 EF0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEN  CODER  =  00036”  <'  (EEX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  00032FDO  ( FEN ) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  -  006 HER  C  M) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =  006K90  C  Y) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  7.  =  OOC.PLE  (!’  \ ) 

NUMBER  OF  BITS  USED  TO  STORE  TIME  OR  O'OIER  PARANE’.’i  R  -  00PB4P  (HEX) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PER  MEM.  BITS  AVAL  I  ABLE 
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K ; .  c 

pit: 


COLLECTION 


i'ATI  ST  ICS  : 
.  TA1 55  9B 


rAGi:  l 


f 


i.  l.-Cr  i  a  l*  (  <  *  • 

DATE  OF  COLLECTION.  . 
TIME  OF  COLLECTION .  . 
COMPRESSION  USED.  .  . 
CHANNEL  X  ENTROPY  .  . 
CHANNEL  Y  ENTROPY  .  . 
CHANNEL  7,  ENTROPY  .  . 
TOTAL  SOURCE  ENTROPY. 
PRESS  RETURN  FOR  PAGE 


.  .  500  IN; 

.  .  23  OCT  80 

.  .  1559 

.  .  TOLAN-A 

.  .  3.0165  BITS 

.  .  3.0038  BITS 

.  .  3.0261  BITS 

.  .  3.0233  BITS 

2  OF  STATISTICS^ 


EKG  SAMPLE  CGI, LECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


}'  RATIO  POSSIBLE.  .  . 

_ 

# 

2.6460  :  1 

tj  COMPRESSION  RATIO 

!  ACHIEVED . 

# 

• 

• 

1  .  5280  :  1 

!  ACHIEVED  COMPRESSIO: 

'  EFFICIENCY . 

r 

• 

• 

32.0  %  OF  MAXIMUM 

!  COMPRESSION’  TIME 

|  EFFICIENCY  OBTAIN FD 

• 

• 

93.0  5  SMP  INTERVAL 

i  COLLECTION  DURATION 

• 

« 

17.7  SECONDS 

CHANNEL  X  MAXIMUM  . 

• 

• 

2.9296 8  VOLTS 

j  CHANNEL  X  MINIMUM  . 

• 

• 

0.19531  VOLTS 

CHANNEL  Y  MAXIMUM  . 

• 

• 

2.89062  VOLTS 

CHANNEL  Y  MINIMUM  . 

• 

• 

0.19531  VOLTS 

CHANNEL  Z  MAXIMUM  . 

• 

• 

2.89062  VOLK'S 

CHANNEL  Z  MINIMUM  . 

• 

• 

0.15625  VOLTS 

COMMENTS . 

« 

• 

X,Y,Z  IN  COMMON,  LEAD 

PRESS  RETURN  FOR  PAGE 

3 

OF 

STATISTICS= 

EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPNO)~  22A2  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  (LPCAI.)  --  26  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (LOOPCT)=  0OOO5B1E  (HEX) 
TIME  EFFICIENCY  =  ( 1  - ( LCOPCT ( EAMPMO* LPCAL )  )  )  *  1 0 0 


CHANNEL  MAXI  MUMS  AND  MIN  I  MUMS 
XMAX=  4B  (HEX)  AT  SAMPLE  NUMBER  1FA2  (HEX) 

XMIN=  05  (HEX)  AT  SAMPLE  NUMBER  O0BD  ( FCN ) 

YMAX=  4A  (HEX)  AT  SAMPLE  NUMBER  ] FA2  (HEX) 

YMIN=  05  (HEX)  AT  SAMPLE  NUMBER  005C  (LEX) 

ZMAX  =  4A  (HEX)  AT  SAMPLE  NUMBER  IF  A  2  ( HEM) 

Z  M I M  =  04  (HEX)  AT  SAMPLE  NUMBER  BIDS  (HEX) 

COMPRESSION  STATISTICS : 


NUMBER  OF  ME: 
NUMBER  OF  BIr 
TOTAL  NUMBER 


NUMBER 
NUMBER 
NUMBER 
NUMBER 
COM  PR  El 


OF 

OF 

OF 

OF 


:ORY  BITS  AVAILABLE  =  021FT0  (HEX) 

'S  AVAILABLE  TO  VAR  LKN  COIN  R  =  0  0  03A7PO 
OF  DATA  BITS  STORED  -  00333F30  (HEX) 


( HEX ) 


B  J  TS 
BITS 
B I  TS 
BITS 


USED 

USED 

USED 

USED 


TO 

TO 

TO 

TO 


STORE 

STORE 

STORE 


CHANNEL  X  --  006BE5  (HEX) 
CHANNEL  Y  =  006 AC 9  (HEX) 
CHANNEL  Z  =  006857  (HEX) 
TINE  OR  OTHER  PAR  A  MET!-  R 


SION  RATIO 


TOTAL  DATA  BITS  STORED  PEP, 


;  I  TS 


OOEPEO  (HEX) 
AY  ALIA BIX! 
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: EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE 


p  T  T  r  V  A  M  P 

'•  •  *  •  # 


SAMPLING  KATE  .  .  .  . 
DATE  OF  COLLECTION.  . 
TIME  OF  COLLECTION.  . 
COMPRESSION  USED.  .  . 
CHANNEL  X  ENTROPY  .  . 
CHANNEL  Y  ENTROPY  .  . 
CHANNEL  Z  ENTROPY  .  . 
TOTAL  SOURCE  ENTROPY. 
PRESS  RETURN  FOR  PAGE 


.  TA1511S 


.  .  DuO  MX 

.  .  1511 

.  .  1511 

.  .  TOLAN-A 

.  .  3.3255  BITS 

.  .  3.3341  BITS 

.  .  3.3560  BITS 

.  .  3.3457  BITS 

2  OF  STATISTICS^ 


1 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE . 2.3911  :  1 

COMPRESSION  RATIO 

ACHIEVED . 1.4319  :  1 

ACHIEVED  COMPRESSION 

EFFICIENCY . 31.0  %  OF  MAXIMUM 

COMPRESSION  TIME 

EFFICIENCY  OBTAINED  ...  94.0  %  SMP  INTERVAL 

COLLECTION  DURATION  .  .  .  16.6  SECONDS 

CHANNEL  X  MAXIMUM  ....  1.32812  VOLTS 

CHANNEL  X  MINIMUM  ....  -2.0703  VOLTS 

CHANNEL  Y  MAXIMUM  .  .  .  .  1.32812  VOLTS 

CHANNEL  Y  MINIMUM  ....  -2.0703  VOLTS 

CHANNEL  Z  MAXIMUM  ....  1.32812  VOLTS 

CHANNEL  Z  MINIMUM  .  .  .  .  -2.0703  VOLTS 

COMMENTS . X,Y,Z  IN  COMMON.  LEAD  AVL 


PRESS  RETURN  FOR  PAGE  3  OF  STATISTICS - 

EKG  SAMPLE  COLLECTION  STATISTICS:  PACE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPMO)  =  2074  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  ( LPCAL)  =  27  ( HEX') 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  <LUOFCT)--=  00004ADC  (HEX) 

TIME  EFFICIENCY  =  ( 1- ( LCOPCTB ( SA.NPHO*LPCAL) ) ) *  1  CO 

CHANNEL  MAXIMUMS  AND  MIN I MUMS 

XMAX=  22  (HEX)  AT  SAMPLE  NUMBER  1171  (HEX) 

XMIN=  CB  (HEX)  AT  SAMPLE  NUMBER  021D  ( EEX) 

YMAX=  22  (HEX)  AT  SAMiPLE  NUMBER  1423  (EEX) 

YMIN=  CB  (HEX)  AT  SAMPLE  NUMBER  021D  (HEX) 

ZMAX=  22  (HEX)  AT  SAMPLE  NUMBER  1423  (HEN) 

ZMIN=  CB  (HEX.)  AT  SAMPLE  NUMBER  00E8  (HEX) 

COMPRESSION  STATIST] CS : 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  021FN0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEN  CODER  =  0003  HO  (  (!UX) 

TOTAL  NUMBER  OF  DATA  BITS  STORED  =  00030AE0  (HEX) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  -  007  17 A 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  V  =  C0713P  (!  Ml 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  7.  -  0061  SI  (R  "■ ' 

NUMBER  OF  BITS  USED  TO  STORE  TIME.  OR  OTHER  PARADE'!':  '  001-000  (HEX) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PER  MEN.  RHS  AVAL  I  ABLE 
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EKG  SAMPLE  COLLECTION 

FI LENAME . 

r/'MLCT . 

SAMPLING  MATE  .  .  .  . 
DATE  OF  COLLECTION.  . 
TIME  OF  COLLECTION.  . 
COMPRESSION  NSEC.  .  . 

CHANNEL  X  ENTROPY  .  . 
CHANNEL  Y  ENTROPY  .  . 
CHANNEL  Z  ENTROPY  .  . 

TOTAL  SOURCE  ENTROPY. 
PRESS  RETURN  FOR  PAGE 


STATISTICS  :  PAGE  1 
.  .  TA1520B 
.  .  BALSA:  .0 
.  .  500  !!Z 
.  .  23  OCT  80 
.  .  1520 
.  .  TOLAN-A 
.  .  2.6012  BITS 
.  .  2.5  80  8  BITS 
.  .  2.6229  BITS 
.  .  2.6104  BITS 
2  OF  STATIST! CS= 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 

RATIO  POSSIBLE .  3.0645  :  1 

COMPRESSION  RATIO 

ACHIEVED .  1  .7  2.47  :  1 

ACHIEVED  COM PP. ESSION 

EFFICIENCY . 35.1  %  OF  MAXIMUM 

COMPRESSION  TIME 

EFFICIENCY  OBTAINED  ...  90.9  ?•,  SMP  INTERVAL 

COLLECTION  DURATION  .  .  .  20.0  SECONDS 
CHANNEL  X  MAXIMUM  ....  2.C7031  VOLTS 

CHANNEL  X  MINIMUM  ....  -0.5468  VOLTS 

CHANNEL  Y  MAXIMUM  .  .  .  .  2.07031  VOLTS 

CHANNEL  Y  MINIMUM  .  .  .  .  -0.5468  VOLTS 

CHANNEL  L  MAXIMUM  .  .  .  .  2.07031  VOLTS 

CHANNEL  Z  MINIMUM  ....  -0,5468  VOLTS 

COMMENTS . X,Y,Z  IN  COMMON.  LEA  D  2 

PRESS  RETURN  FOR  PAGE  3  OF  STAT1STICS= 


EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  ( SANPMO) =  2717  (LEX) 

MAXIMUM  LOOP  COUNT  PER  INTERiMT  F  ( LPCAL )  -  27  (HEX) 

TOTAL  WAITING  LOOP  COUNTS  DUPING  COLLECTION  (LOOPCT)*  00008A6D  (HEX) 

TIME  EFFICIENCY  =  ( 1 - ( LCOPCT'  ( SAK?MO*LPCAL) ) ) *  1 0 0 

CHANNEL  MAXI  MUMS  AND  MIN  I  MUMS 

XMAX=  35  (HEX)  AT  SAMPLE  NUMBER  1F9E  (HEX) 

XM IN=  F2  (HEX)  AT  SAMPLE  NUMBER  0AG3  (HEX) 

YMAX=  35  (HEX)  AT  SAMPLE  NUMBER  1F9E  (F.EX) 

YMIM=  F2  (HEX)  AT  SAMPLE  NUMBER  0:>4P.  (HEX) 

ZMAX  =  35  (HEX)  AT  SAMPLE  NUMBER  1F9E  ( HEX) 

ZMIN=  F 2  (HEX)  AT  SAXPLF  NUMBER  0  54B  (HEX) 

COMPRESSION  STATE V TICS: 

NUMBER  OF  MEMORY  V 1 TS  AVAILABLE  =  021 FF0  (MEN) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  T.I'N  CODER  -  000  M  if)  (E!X) 

TOTAL  NUMBER  OP  DATA  BITS  STORED  =  (M’OWaRE  (HEX I 
NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  -  006 6DE  C  .1 
NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =  0  0 66 6 6  (  :  .  M  ■ 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  7.  -  006  3CC  M  A 

NUMBER  OF  BITS  USED  TO  STORE'  TIME  OH  GV-'FE  V!  •  :  0  0E6  3  0  (SEX) 

CO?' PR  ESS  I  ON  RATIO  =  TOT/M.  DATA  BITS  STOLEN  MM:  :  M'S  AVAL  I  ABLE 
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EKG  SAMPLE  COLLECTION 

FILENAME . 

Si'iVLCV . 

SAMEL  I LC;  LATE  .  .  .  . 

DATE  OF  COLLECTION.  . 
TIME  OF  COLLECTION.  . 
COMPRESSION  USED.  .  . 
CHANNEL  X  ENTROPY  .  . 

CHANNEL  Y  ENTROPY  .  . 
CHANNEL  Z  ENTROPY  .  . 
TOTAL  SOURCE  ENTROPY. 
PRESS  RETURN  FOR  PAGE 


STATISTICS  :  PAGE  1 
.  .  TA1439ST 
.  .  STROUP 
.  .  500  112 
.  .  23  OCT  80 
.  .  1439 
.  .  TOLAN-A 
.  .  3. 2669  BITS 

.  .  3.27  56  BITS 

.  .  3.3094  BITS 

.  .  3.2  912  BITS 

2  OF  STATISTICS- 


EKG  SAMPLE  COLLECTION  STATISTICS  :  PAGE  2 
APPROX  MAX  COMPRESSION 


RATIO  POSSIBLE .  2.43  07  :  1 

COMPRESSION  RATIO 

ACHIEVED . 1.4314  :  1 

ACHIEVED  COMPRESSION 

EFFICIENCY . 3  0.1  %  OF  MAXIMUM 

COMPRESSION  TIME 

EFFICIENCY  OBTAINED  ...  93.4  %  SMP  INTERVAL 

COLLECTION  DURATION  .  .  .  16.6  SECONDS 
CHANNEL  X  MAXIMUM  ....  3.35937  VOLTS 
CHANNEL  X  MINIMUM  .  .  .  .  -0.5468  VOLTS 
CHANNEL  Y  MAXIMUM  .  .  .  .  3.35937  VOLTS 
CHANNEL  Y  MINIMUM  ....  -0.5468  VOLTS 
CHANNEL  Z  MAXIMUM  ....  3.35937  VOLTS 
CHANNEL  Z  MINIMUM  .  .  .  .  -0.5859  VOLTS 
COMMENTS . X  ,  Y  ,  Z  IN  COMMON.  LEAD  1 


PRESS  RETURN  FOR  PAGE  3  OF  STATISTICS= 


EKG  SAMPLE  COLLECTION  STATISTICS:  PAGE  3 
NUMBER  OF  SAMPLES  TAKEN  (SAMPMO)=  2071  (HEX) 

MAXIMUM  LOOP  COUNT  PER  INTERRUPT  (I,FCAL)  =  27  (LEX) 

TOTAL  WAITING  LOOP  COUNTS  DURING  COLLECTION  (LOOPCT)=  0000526C  (HEX) 

TIME  EFFICI ENCY  =  ( 1- ( LOOPCTL ( SAMPNO*LPCAL) ) ) *100 

CHANNEL  MAXI  MUMS  AND  MINIHUMS 

XMAX=  56  (HEX)  AT  SAMPLE  NUMBER  1472  (HEX) 

XM IN  =  F 2  (HEX)  AT  SAMPLE  NUMBER  ] H5A  (HEX) 

YMAX=  56  (HEX)  AT  SAMPLE  NUMBER  1472  ( HEX) 

YMIN=  F 2  (HEX)  AT  SAMPLE  NUMBER  0FD8  (HEX) 

ZMAX=  56  (HEX)  AT  SAMPLE  NUMBER  1472  (HEX) 

ZMIN=  FI  (HEX)  AT  SAMPLE  NUMBER  1E5A  (HEX) 

COMPRESSION  STATISTICS : 

NUMBER  OF  MEMORY  BITS  AVAILABLE  =  021FF0  (HEX) 

NUMBER  OF  BITS  AVAILABLE  TO  VAR  LEE  CODER  -  0  0 0377  BO  (HEX) 

TOTAL  NUMBER  Or  DATA  BITS  STORED  =  00030A9R  (HEN) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  X  -  006E8E  (1  .  V.) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  Y  =  006  EEC  (I  I  E) 

NUMBER  OF  BITS  USED  TO  STORE  CHANNEL  7,  =  CO^CEO  •. !  X ) 

NUMBER  OF  BITS  USED  TO  STORE  TIME  OR  OTHER  I’A  •' A- "  ‘  :  =  0  0DDC0  ( HEX ) 

COMPRESSION  RATIO  =  TOTAL  DATA  BITS  STORED  PEP  MEE  .  ,nS  AVAL  I  ABLE 
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DR-8  RESEARCH  RECORDER 
_  MONITOR 


The  Model  DR-8  Research  Recorder  is  designed  to  operate  from  a  100-180 
volt,  60  Hz  line.  Power  consumption  is  about  700  waits.  The  circuit  is 
protected  by  a  10  ampere  circuit  breaker  which  is  incorporated  in  the  power 
ON-OFF  switch  on  the  camera  panel. 

It  is  essential  for  safety  and  to  minimize  60  Hz  interference  in  the  tracings 
that  the  Research  Recorder  be  connected  to  a  good  ""round".  A  third  wire 
is  brought  out  at  the  power  plug  for  this  purpose.  A  good  "ground"  can  usually 
be  obtained  at  a  cold  water  pipe. 

The  instrument  combines  as  many  as  eight  amplifiers  with  a  cathode  ray 
tube  recording  camera  and  two  cathode  ray  tube  monitors.  The  multitrace 
monitor  displays  any  number  of  traces  up  to  eight.  The  single  monitor 
displays  any  one  of  the  traces  enlarged  or  reduced  in  size.  It  is  also  used 
for  the  presentation  of  loops,  such  as  the  vectorcardiogram  or  the  lung 
compliance  and  lung  resistance  loops,  and  for  balancing  strain  gauge  amplif¬ 
iers.  All  phenomena  can  be  monitored  continuously.  Reconi  in. g  is  done  at 
will,  merely  by  turning  a  switch.  The  display  on  the  cathode  rav  tube  in  the 
camera  can  be  identical  to  that  on  either  the  muititrace  tube  or  the  single 
trace  tube.  It.  is  therefore  possible  to  photograph  either  scalar  tracings,  or 
loops.  In  actual  operation,  size  adjustments  and  preliminary  measurements 
arc  made  by  observing  the  monitor  screens  without  recording.  Thus,  the  camera 
runs  for  only  short  intervals. 

The  muititrace  tube  has  only  one  beam,  but  because  the  amplifier-'  are  connecti ; 
to  it  through  an  electronic  switch  operating  at  a  rate  of  I-,'11  lb  co.  ,  it  ;~ 
possible  to  display  as  nianv  as  eight  traces  simultar.eous'.v.  1  mi  .-v.  r,  es 

rapidly  from  one  trace  to  the  next,  with  blanking  m  the  cat  a. 'do-  r  '  ibe  ta 
place  (luring  the  .switching  period.  Thus,  eacii  In  on  i.  or.  seiaen  '.y  1  -m  of  t.v 
time,  although  giving  the  impression  of  being  continuous.  A  su  r  proven  d 

to  make  possible  more  frequent  sampling  lor  high  spet  d  pin  no:*  .  e  ,  i.y  ledue:  :g 
the  numlier  of  channels  displayed. 
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POWER  switch,  located  on  the  right  side  of  camera  panel,  turns  the  Research 
Recorder  on.  A  minute  or  two  is  required  before  the  traces  on  the  monitor 
screens  are  stabilized.  Adjustments  may  now  be  made. 


INTENSITY  and.  rOH'S  control  adiust  the  eath.ode  ray  tube  beams.  The 
upper  two  controls  are  for  the  avail U race  time,  the  lower  two  for  the  single 
trace  tube.  The  intensity  is  set  according  to  the  hrvihtr.ess  of  the  n  on  in 
which  the  instru mint  is  i.-ein  ■  use<i.  Th.e  traces  wall  be  sharper  at  * .v  r  mt-m- 
sities.  Focus  is  adiusted  ior  tr.c  sunniest  spot  and  snoui.i  be  d.-m  ■  -.on  t in- 
beams  arc  approximately  1  urci  of  the  distance  in»m  either  side  ol  ; i . . •  : c: t « ■  to 
allow  best  overall  focusing. 

FUNCTION  selector  switch  determines  the  presentation  on  the  simile  trace  tube; 
the  multitrace  tube  will  display  scalar  truces  continuously.  The  single  tram  tube 
will  display  the  trace  irorn  .any  amplifier  wiien  the  FUNCTU  >N  elect  a-  switch  is 
in  the  SWEEP  aann.  In  me  RAl.ANCE  posilie.n,  a  oaitern  is  <iu  s'.v.e.l  "i;  iho 
single  trace  screen  which  nernats  rapid  balancm  ;  ot  the  |nv;  .'lire  tr.-.a  race;- . 

In  LOOPS,  any  ch.an.nid  can  be  presented  on  tin-  hoi  i/imtai  axis  ot  the  sinvle  trace 
tube,  and  at  the  :..ume  tune  a. re  otic  ‘  e  pr<a  enti  d  on  t::e  y.  ri  cal  axis. 

This  position  is  used  tor  the  VCG  ops  (X-Y  plot). 


*1 


i 

i 
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SVVETP  switch  determines  the  speed  at  which  the  traces  move  across  the 
screen.  The  proper  setting  depends  on  the  repetition  rate  el  the  phenomena 
c!  iso  lav  i'd.  Xir.e  monitor:::  v  s:  as  are  :ivni  ln’de:  2.3.  ,  10,  2”,  to,  73,  '.no, 

133  and  2oo  mm  .-me. 

The  MUI. TITRATE  MONITOR  permits  the  display  of  up  to  eight  channels 
at  one  time.  The  positions  of  uie  individual  traces  on  the  muititraee  tube 
are  controlled  by  the  CENTER  knob  on  the  individual  channels.  Each  of  the 
traces  can  be  positioned  anywhere  on  the  screen,  superimposed  on  other 
traces,  or  can  be  moved  off  screen  in  either  direction  if  it  is  not  being  used. 

The  amplitude  of  the  traces  on  the  multitrace  screen  wiil  depend  upon  the 
setting  of  the  AMPLITUDE  controls  on  the  individual  amplifiers. 

The  CHANNELS  switch  determine?  the  number  of  amplifiers  that  will  be  displayed. 
The  multitrace  presentation  is  the  result  of  an  '  channel  electron  switch,  whose 
basic  frequency  is  -Is  K  II?..  In  the  1-8  position,  each  amplifier  will  be  sampled 
equally  G,000  times  second.,  or  every  Id-',  microseconds .  In  the  1-3  posy  am, 
channels  1,  2  and  3  are  sampled  at  12,000  times  second  or  every  si  microseconds. 
Channels  -i  and  3  arc  sampled  at  the  normal  * > .  0 ■  > times  and  channels  3,  7  and  S 
are  not  displayed  at  all.  Placing  the  mult. trace  switch  at  1-3  will  sample  channels 
1  and  2  at  the  12,000  rate  and  3,  -1.  3  and  3  at  Me  normal  6,000  rate.  Channels  7  a 
8  will  not  appear  on  the  muititraee  screen.  Amplifiers  providing  fast  rise  time 
phenomena,  such  as  heart  sounds,  action  and  nerve  potentials,  should  be  in 
positions  1,  2  and  3  to  take  advantage  of  the  faster  sampling  rate  and  to  minimize 
the  dotting  effect. 

When  the  SUBTRACT  SELECTOR  switch  is  in  the  OFF  position,  the  built-in 
baseline,  gradient  ami  sin  tract  tunetions  are  inoperative.  Turning  switch,  to 
BASELINE  will  allow  built  in  baseline  to  bo  positioned  to  any  point  on  screen  with 
POSITION  control.  An  event  MARK  button  and  ;  nek  (for  mar.niv  trom  a  remote 
position)  are  provided.  To  display  either  baseiim  or  gradient  1-3.  1-- 

switch  must  be  in  1-',  since  baseline  or  gradient  trace  replace  channel  m  When 
BASELINE  or  GRADIENT  position  is  selected  channel  '  amplifier  will  r.ui  be  seen. 

A  PRESSURE  GRADIENT  can  be  displaced  on  the  multitrace  screen  together 
with  the  two  pressures.  The  adjustment  procedure  is  as  follows: 

1)  Attach  pressure  transducers  to  pressure  amnlifiers:  allow  them 

to  warm  up,  balance  the  amplifiers.  Position  the  traces  to  1  a  Lao 
from  which  measurements  are  to  be  made:  equalize  the  am.  Lmm  s. 

(See  SGA-SGM  instructions) 

2)  Turn  the  SUBTRACT  SELECTOR  switch  to  "GRADIENT"  "w  .mdu  r.: 
trace  will  now  be  substituted  for  Channel  s  and  its  pus. tier,  v  •r.tr.'ileii 
by  the  baseline  POSITION  control. 

3)  Turn  HORIZON  I  A  I.  SIZE  ar.d  SUBTRACT  SIZE  to  zero  toountcrcl’chwisei 


4) 


S<.  ieet  the  channel  to  be  subtracted  from  with  the  Horizontal  switch; 
the  channel  to  be  subtracted  with  the  Subtract  switch. 

5)  *  .niton  t.ie  gru  heat  trace  to  the  bast  line  \  -  .ti-m  of  the  tv.o 
pressure  channels.  There  are  now  3  or  -1  lines  superimposed  i.e.  ,  2 
pressure  amplifiers,  the  difference  trace  (gradient)  and  optionally 

a  baseline,  which  can  be  a  baseline,  marker  trace,  or  any  unused  pressure 
amplifier. 

6) '  Turn  the  +/-  switch  to  +. 

7)  Turn  HORIZONTAL  SIZE  slowly  clockwise;  note  in  which  direction 
trace  moves.  If  it  moves  upwards,  turn  HORIZONTAL  CENTER  counter¬ 
clockwise  to  return  trace  to  its  original  position.  Advance  HORIZONTAL 
SIZE  fully  clockwise  and  readjust  HORIZONTAL  CENTER,  if  necessary. 
When  the  center  is  optimally  adjusted,  turning  HORIZONTAL  SIZE  should 
not  affect  the  position  of  trace.  Return  HORIZONTAL  SIZE  to  zero.  iR  pea 
procedure  with  SUBTRACT  SIZE  and  CENTER  controls,  re  turning  SIZE  to 
zero  after  obtaining  balance. 

8)  Turn  CALIBRATE  control  on  pressure  amplifier  which  was  selected 
by  HORIZONTAL  SWITCH  so  that  its  trace  moves  approximately  full 
screen;  adjust  HORIZONTAL  SIZE  until  gradient  trace  coincides  with  the 
pressure  trace.  Remove  the  CALIBRATE  signal  from  the  pressure 
amplifier  and  both  lines  will  return  to  their  original  positions. 

gj  Turn  the  CALIBRATE  on  that  amplifier  selected  by  SUBTRACT  switch  until 
the  pressure  trace  moves  approximately  lull  screen.  Adjust  SUBTRACT 

SIZE  until  lines  are  superimposed.  Return  CALIBRATE  switch  to  zero 
and  both  lines  will  return  to  their  original  positions. 

10)  The  "Gradient"  trace  will  now  represent  the  sum  of  the  two  pressures. 

To  observe  the  gradient,  turn  the  -  -  switch  to  -.  Readjust  gradient 
POSITION,  if  necessary. 

For  the  II  and  V  sections  of  SUBTRACT  SELECTOR  switch,  see  loops. 

SINGLE  TRACE  MONTTnR  presentation  is  dot,  mined  by  the  FUNCTION  switch. 
Any  individual  amplifier  can  fo  >;is-d:n--'<i  win  n  tro  "‘UNCTION  switch  is  in  the 
SWEEP  position.  Turn  the  VER  i'lCAi.  -■•.dec;  -r  switch  t>  the  channel  number 
representing  the  desired  amni  liter.  Mala  o  rtam  this  amplifier  is  visible  on 
multitracc  screen.  The  position  of  the  selected  trace  can  be  controlled  by  the 
CENTER  control  «m  tile  channel,  or  bv  the  VERTICAL  CENTER  control.  The 
amplitude  on  tiie  screen  is  aciiuste-i  by  the  VERTICAL  SIZE  control  and  can  be 
2  1/2  times  the  amplitude  of  the  corresponding  trace  on  the  muititrace  tube,  or  it 


can  be  reduced  as  low  as  zero  amplitude.  When  the  SIX  1C  control  is  at  zero 
(completely  counterclockwise),  the  Cl  INTI  IK  control  will  have  no  eiu-ct.  If 
trace  is  more  than  Id'  from  mid-screen,  (SIX E  control  fully  counterclockw  ise) 
turn  scrov. drive r  a  im  '  '  ei  v.  vertical  CENTER  :  >  r -•* «: :  a  bs.-w  lin-  t  >  mi  w-  • 
Turning  the  SIXK  control  clockwise  may  move  trace  off  screen.  Note  in  v.  men 
direction  it  moves  (up  or  down)  and  return  trace  to  screen  with  VERTICAL  CENTER 
control.  II  trace  moves  upward,  turn  CENTER  counterclockwise;  if  trace  moves 
downward,  turn  CENTER  clockwise.  '• 

The  BALANCE  position  of  the  FUNCTION  switch  will  display  a  lissajous  figure, 
which  is  used  as  an  aid  in  balancing  a  transducer  in  a  pressure  amplifier. 

Turn  VERTICAL  selector  switch  to  pressure  amplifier  (with  transducer  connected) 
to  be  balanced.  The  horizontal  deflection  represents  me  transducer  excitation 
voltage,  the  vertical  represents  the  output  voltage  front  the  transducer  titrouga 
a  pressure  amplifier. 

The  vertical  FIXE  and  CENTER  controls  do  not  have  anv  effect  in  the  BAI.ANCE 
position.  When  the  transducer  is  brought  into  balance,  there  will  not  be  any 
output  voltage,  and  the  lissajous  presentation  will  be  a  straight  horizontal  line. 

In  LOOPS  position,  the  VERTICAL  selector  switch  selects  the  channel  to  be 
presented  on  the  vertical  axis,  and  the  vertical  SIZE  and  CENTER  controls  are 
used  to  adjust  vertical  amplitude  and  position. 


The  HORIZONTAL  switch  selects  the  channel  to  be  presented  on  the  horizontal 
axis,  and  the  horizontal  SIZE  and  CENTER  controls  are  used  to  ait.iusi  hor if.  w.t; 
amplitude  and  position.  When  the  HORIZONTAL  for  VERTICAL)  SIZE  eor.trci 
is  turned  to  minimum  counterclockwise ,  the  CENTER  controls  will  not  have  my. 
effect.  A  dot  should  appear  at  mid-screen.  If  it  is  more  than  I"  from  mid-sw 
adjust  screwdriver  controls  below  VERTICAL  CENTER  or  HORIZONTAL  SIZE 
until  dot  is  at  mid-screen. 


Advance  HORIZONTAL  SIZE  clockwise  and  adjust  HORIZONTAL  CENTER  o 


to  its  original  position  near  mui-sereon.  Proper  adiust 
when  it  is  possible  to  turn  horizontal  SIZE  trom  :r.im:vu 
maximum  clockwise  without  moving  dot  warn  mere  isn't 
the  same  with  the  VERTICAL  and  SUBTRACT  ewitcr.es: 
to  minimum  countereloekw iso. 


meat  of  center  is  n<  hr  vt  d 
m  eountereioekwiso  to 
anv  applied  signal.  He 
return  the  sub; met  SIZE 


The  II  or  V  positions  of  SUBTRACT  SELECTOR  make  it  possi'  ie 
the  signals  from  two  channels  on  either  the  horizontal  or  \  .  mw  i 
loops.  This  is  especially  useful  when  measuring  Emu;  C. m:.v 
For  example:  Let  us  suppose  it  is  desired  to  si:  m  met  »rom  t  - 
HORIZONTAL  switch  selects  the  amplifier  to  bo  subtracted  :  r  >m. 
SUBTRACT  selector  switch  is  used  to  select  the  channel  m. 

is  turned  to  -.  The  FVUTUACT  SELI.C  F<  at  turned  :n 1  • 
The  SUBTRAC  T.  SIZE  and  CENTER  cxitr  >ls  w>il  u  rn.  o  1  •  - 
tal  amplitude  and  position  out  in  a  oireciion  o>»p.  tMle  ;o  m..e  .  i 
controls.  Sec  instructions  lor  lain;  Resistance  and  Lung  Comp:;. 
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Timing  and  direction  marking  can  be  introduced  to  ihe  loop  patterns  bv  turning 
the  camera  selector  to  LOOPS  and  choosing  the  awronriate  TEMINO  rate.  TV 
camera  ON-opp  switch  need  iv»t  be  <  »N  to  disn’.av  umi;:  ,  on  I- »< ;  ;.v,  ; 

when  photographing  'loop.  Camera  timing  should  be  in  .00-1  or  .02  to  properly 
display  LC/LR  loops;  or  .00-1  for  VCG. 
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MONITOR 


MOD KL  Dli-12 

T'.,c  "  •  '.2  recorder  is  a  modified  version  of  the  DR-'*.  The  DR-$  instruction 

plus  ;,.v  iOiiov.  1114  information  covers  the  operation  of  ir.e  DR-12. 

The  amplifiers  in  the  DR-12  are  numljered  from  1  through  12.  Ten  of  these,  1-10, 
starting  from  the  top,  are  located  on  the  left  side  of  the  recorder;  numbers  11  and 
12  are  located  beneath  the  monitor  panel.  The  eight  displayable  channels  of  the 
recorder  are  lettered  from  A  through  H  with  a  dial  type  switch  supplied  for  each 
channel  which  permits  any  of  the  12  amplifiers  to  be  selected  on  any  of  the  v  channels. 
Since  it  is  possible  to  sedect  the  same  amplifier  on  more  than  one  channel,  the  user 
should  be  certain  that  each  of  tiie  dials  is  set  to  a  different  number  or  the  same  trace 
will  appear  on  the  screen  more  than  once. 


The  A-E,  A-F,  A-H  switch  on  the  monitor  panel  can  be  used  to  sample  two  or  three 
channels  more  frequently  than  the  others.  The  electronic  switching  rate  is  -IS  000 
Hz/second;  each  of  the  s  channels  is  sampled  0,0 00  times  per  second  when  the  swit..i 
is  in  the  A-H  positior  A-E  position,  channels  A,  R,  and  C  are  sampled 

12,000  times,  secoiv  oe  channels  D  and  H  are  sampled  <‘>,000  times  second.  Only 


5  channels  are  operative  in  this  position.  In  the  A-F  position,  channels  A  and  15 
are  sampled  12,000  times  second  while  channels  C.  D.  K  and  F  are  samoled  » .  - 1 . , m 

times  second.  Operation  is  i;  rit<  '■  to  « •  hi  a  !.  a  p- a  •  •  . . 

be  sampled  at  those  burner  rates  bv  select imr  tiiem  on  channels  A  or  P>. 

SUBTRACT  SELECTOR  switch  marked  BASELINE,  GRADIENT,  OFF,  H  and  V,  when 
positioned  on  BASELINE  or  GRADIENT,  will  remove  channel  II  (A-E,  A-F,  A-H  switch 
must  be  on  A— II)  from  display  on  multitrace  screen  and  replace  it  with  a  baseline 
or  gradient  trace.  With  switch  in  BASELINE,  the  POSITION  control,  below  the 
switch,  can  be  used  to  set  the  baseline  to  any  desired  point.  A  MARK  pusii  button 
and  remote  MARK  jack  can  be  used  as  an  event  marker.  A  hand,  foot  switch  can  be 
patched  into  MARK  jack,  to  mark  events  from  a  remote  point.  Placing  switch  on 
GRADIENT  position  will  permit  the  display  of  gradients  using  built  m  gradient  amp¬ 
lifier  (POSITION  control  is  the  same  as  for  baseline).  Toe  suntraetion  is  done 
horizontally.  See  section  on  ’'subtraction''  in  DR-^  instructions.  The  H  and  V  nnsiticn 
of  the  SUBTRACT  SELECTOR  switch,  permit  subtraction  on  vector  screen,  either 
vertically  or  horizontally  in  the  OFF  position,  subtract  or  GRADIENTS  and  BASELINE 
are  inoperative.  See  DR-S  instructions. 
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ST- 6833 
M68-CH1 70S 


SPECIF  I  CATIONS 


DATA  ACQUISITION'  SECTION 


Sped  f  i  cations 

Typical  @  +25°C,  dynamic  conditions,  unless  otherwise  specified. 


Analog  Inputs 

Number  of  Channels 
Channel  Expansion 


Full  Scale  Input  Ranges 


Current  Input  Channel  Range 
(8  Channels) 

Common  Mode  Range 

Input  Overvoltage 

Input  Impedance 

Input  Bias  Current 

Input  Capacitance 


32  Single-ended  or  16  differential 

Up  to  128  single  ended  or  112  di f forentidl 
using  ADC-Slave  Expander  Cards  (Model  ST-8. 

0  to  +5  Volts 
0  to  +10  Volts 
-5  to  +5  Volts 
-10  to  +10  Volts 

4-20  mA  type 


+10  Volts 

+35  Volts  Max.  continuous 

100  Megohms  differential  or  to  ground 

3nA  typ. ,  lOnA  max. 

5pF,  OFF  CHANNEL,  100  pF  ON  CHANNEL 
to  ground 


Performance 


Accuracy  @  +25C 
Reso 1 ut ion 
Nonl i neari ty 

Differential  non-linearity 
Gain  Error 

Offset  or  Zero  Error 
Gain  Temperature  Drift  (Bipolar) 
Zero  Temperature  Drift  (Unipolar) 
Common  Mode  Rejection 
Power  Supply  Rejection 


Within  -KI.0254.  of  input  range 
12  Binary  bits  (1  part  in  4096) 

+1/2  I.SB  maximum 
+1/2  LSB  maximum 
Adjustable  to  zero 
Adjustable  to  zero 
Within  +10  ppm  of  FSE  C 
Within  +5  ppm  of  FSK'C  max. 

70  dB  min,  DC  to  1  kHz  with  lkTL  unbal.ir.ci 
100  dB  to  +5V  bus 
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ST-6800 

M68-DH1705 


Dvnani c 


Typical  Data  Transfer 


I/O  Period  (Total) 

36  microseconds 

Throughput  Period 

20  microseconds 

Acquisition  Time 

8  microseconds 

A/D  Conversion  Time 

12  microseconds 

Aperture  Time 

100  nanoseconds 

Sample/Hold  Switch 

.01%  Max. 

Feedthrough 

MUX  Crosstalk  from  OFF  Channel: 

.007%  <3  1  kHz,  Rs  =  IK 

Digital  Outputs 

Output  Coding 

Straight  Binary  (Uni  polar)  j 

Offset  Binary  (Bipolar)  f  r 

2's  Complement  (Bipolar)  J  1  1  r tl 

Output  Format 

2-Byte  group  electricn.il  v  comnat  iblo  to 
Motorola's  EXORc iser  bidi  rectier.al  bu.- . 

Sign  extension  is  jumper  select  id  on  hit* 

1 2  thru  15  for  2's  complement  units.  Bit 
12  thru  15  are  logic  zero  (or  all  other 
uni ts . 

Channel  Addressing 

Random  channel  addressing  mav  be  started 
by  external  interrupt  input  tor  event 
operation  or  b>  inter  rial  program  control 

Base  Address 

Prewired  by  PC  Board  jumpers  for  one  o!  1 
base  addresses. 

Data  Distribution  Section  (D/A 

Analog  Outputs) 

Number  of  Channels 

Resolution 

2  (Expandable  only  by  stand-,, loin  ST-CKOOih 

Boards . ) 

12  Bits 

F".l  1  Scale  Output 

0  to  +5  Volts 

Voltage  Ranges 

0  to  +10  Vol ts 
-5  to  +5  Volts 
-10  to  +10  Volts 

Input  Coding 

Straight  Binary  (Unipolar) 

Offset  Binarv  (Bipol.n) 

2's  Complement  (Bipolar) 

Output  Impedance 

.05  ohm 

Output  Current 

+5  mA  m i n 
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i  •-  '  .  .  .  .  .  :  u 

Non  1  incar ity 

Di f f erent ial  Nonl inoar i ty 

Gain  Error 

Offset  or  Zero  Error 


Gain  Temperature  Drift 
Zero  Temperature  Drift 
Offset  Tempo raturc  Drift 
Settling  Time  (20V  change) 
Slew  Rate 

Power  Supply  Rejection 


+  1/2  LSB,  maximum 

+  1/2  LSB,  maximum 

Adjustable  to  zero  using 
channel 

Adjustable  to  zero  using 
channel 


pot.  for  each 
pot  for  each 


+20  ppm  of  output/°C 
(Unipolar  output)  +5  ppm  of  FSR/°C 
(Bipolar  output)  +10  ppm  of  FS?./°C 
U  microseconds  to  +  1/2  LSB 
20V /usee 

+0.02/  of  FSR  per  1®  variation 


Power  Consumpt i on 

1.2  ampstypical  0  +5  vdc  supplied  from  MPU  bus  connector.  On-board  DC  to  DC  Conver 
supplies  +15  vdc  to  linear  circuits. 


Phys i ca 1 

Operating  Temperature  Range 
Storage  Temperature  Range 
Card  Size 


0°  to  +70°C 

-25°C  to  +85°C 

9 . 75"W  x  5. 75"H  x  .0G2"D 


General  Information 


Specifications 


Sensitivity 


10  millivolts  per  chart  lira-  cnn). 

Full  scale- d.-flectu  n  from  cli.ii  t  m  ut.  i  :  200  millivolts. 


Sensitivity  steps . 01,  .02,  .05,  .1,  .2,  .5,  1,  2.  5  and  10  volts  p<  r 

chart  line  (nun).  Maximum  attenuator  error  1  with 
balanced  input. 


Measurement  range 

Single-ended  input  (5  megohm) 


.010  volt  to  400  volts 


Balanced  input  (10  megohm)  .  . . 010  volt  to  400  volts,  side  to  side,  allowable  v  ■  1  * ;> .: *- 

off-ground  at  any  attenuator  step  lOfQ  x  ;  •  r 
chart  line  switch  s<  ttinr  up  to  500  volts  ot: -ground. 


Common  mode  rejection 


Better  than  1000  to  1,  attenuator  set  in  .01  volt  ;a  ; 
chart  line  posit  ion. 


Zero  line  stability .  I. ess  than  1  4  chart  line  (nun)  per  hour.  T.  i..l  ini' 

over  eight  hour  period  not  more  than  1  2  chan 
line  (mini. 


Noise 


Not  noticeable  on  chart  with  shorted  input. 


Frequency  response .  The  record. -t  p.-.,k- to-p- ak  r  :  !••  of  a  roust.,:  • 

voltage  si:.,  w.iv>  will  t  -  v. : • : . i :  •  1 :  t  lun 

.of  a  nominal  1U  lui>  Iron.  ■  >.;  .  1  m  cp.-.. 


Maximum  amplitude 


40  lines  (nuni 
20  lin.'S  (mm1 
10  Inn  s  (rum) 


p.-uk-t  '-p.  ,k.  l)J'. 
p.  ak-to  .j  .  ,K.  IV 


-o  40  , 

to  In  i  i  ps. 
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General  Information 


Specifications 


Pen  Bias .  Permits  positioning  of  p«-n  on  chart, 

lines  (nnn).  Effective  for  either  sin.; 
balanced  input. 


Trace  linearity .  D.  C.  within  27  full  chart  width, 

A.  C.  within  3  i  full  chart  width,  a’ 
within  limits  of  maximum  amplitv/h 
writing. 


Trace  width 


0.00C  with  Model  HA  2C22-31  pen. 


Writing  method 


Electric  stylus. 


Number  of  recording  channels 


2 


Number  of  event  channels 


1  actuated  by  external  switch. 
1  actuated  by  panel  switch. 


Channel  width 


40  nun  (40  divisions). 


Chart  Supply 


150  feet 


Chart  speeds 


1.  5,  25,  and  125  mm  per  see 


Chart  speed  regulation 


Synchronous  motor,  direct  drive. 
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Pave  /..? 


General  Information 


Specifications 


Operating  Temperature  range,  ambient .  0°C  to  SS'C. 


Power  requirements  .  105-325  volts,  60  cps,  135  watts  at  115  volts. 


Transistors .  1-5651  and  2-56S7 


Tubes .  1-6BW4,  2-12B4A.  2-12AT7.  2-12AX7 


Input  terminals 

Front  (signal) .  Binding  posts. 


Rear  (event  Marker) 


Binding  posts 


Supplies 


DESCRIPTION 


BIU'Sll  BAHT  NO. 


Cha-t  Paper,  2  channel 


RA  2922-22 


Electric  Sty li  (4) 


RA  2822-3  1 


Gram  Gage  Assembly 


2274  16-91  •') 


Pen  Mounting  Tool 


/Vyo  1.1 
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1-1  INTRODUCTION 

The  M680U  hXOKo.striMoNSDTt  is  a  ■>>  Mem 
development  tool  used  in  the  desien  ami  development  ot 
M6S00  Microcomputer  Systems  The  PX<  'Reiser  Debur 
and  the  user’s  system  .ire  built  around  die  M''.sno 
Microcomputer  P.m'ily  ot  Parts.  1  he  Mbsno  Microcom- 
puter  familv  of  Parts  are  discussed  in  the  follow  mj: 
documents 

•  M'opo  MieropriKessor  Ptograntmine  Manual 

•  Mt'SOit  Microprocessor  Applications  Manual 

•  MtiSOlt  Microprocessor  I  .miilv  o!  Parts  Data  Sheets 

The  EXORciser  may  he  configured  in  a  vaitetv 
of  applications  and  vv  ith  various  T\(  'Reiser  options  Tins 
manual,  rather  than  disctisur.g  every  possible  conlteuia- 
tion  and  option,  discusses  only  the  basis  P.XOReiset  with 
each  option  except  the  Wuewr.tp  and  Extender  Modules 
discussed  in  a  supplement  to  bus  tr.aira.il.  The  baste 
EXORciser  is  discussed  m  I’.uaciapn  1  i  and  the  options 
are  identified  in  P.iragiapi;  I  ,t>. 

T  his  in.uui.il  provides  general  ttnorin.ition.  in¬ 
stallation  instructions.  .ippii..  t;ons  mtorm.ition.  operat- 


in;  proeedures.  and  theory  of  operation.  tor  Mototol.i  ' 
Most  it)  1  Xt  JKciscr.  The  Most  hi  E  XORc  iscr  is  liiust: aiec 
in  Figure  I  1 

12  EXORciser  FEATURES 

The  features  of  the  Kimc  I  \f  ;se:  unit  ale. 

•  Fievihle.  adaptahle.  and  evpandahie  design  develop¬ 
ment  tool 

•  Easy  to  use 

•  Provides  the  Microprocessing  I'm:  capability  1, P. -ti¬ 
the  PXORciscr  and  Tr.e  use:  s  sy  uctu 

•  Saves  system  design  and  de'el-'pmettt  tin  e 

•  Decreases  system  design  and  development  costs 

•  Evaluates  and  debugs  the  n set’s  pioet.itu 

•  Evaluates  and  dehues  tne  use;''  sy  stem  h.iulware 

1-3  EXORciser  SPECIFICATIONS 

1-1  identities  the  basic  TXOisciset 


Table 

peeifieatioiis 


TABU  1-1.  b  tisic  EXORciser  Specifications 


C  H  \RA(  11  RES  IKS 

SPECIFIC  \  |  lOXs 

Power  Reijiniement' 

uv  i  ts  y,is  yvn  \ 

47-- Ido  11/.  I'oW 

Word  Xi/e 

Data 

X  bits 

Address 

lb  bits 

Instiuciions 

K.  lb.  or  1-1  1'  ts 

Memory  Si/e 

Ml.  b-.te- 

Instruction  Set 

'1  v  ,ii  i.dd  •  .  '< 

Clock  cv c Ic  time 

i  lock  Ivtw  ;■■■• 

intciiupt 

Maskable  t  at  1  ■ 

Phv  sic  lal  t  hat.'  let:  ttes 

Table  toji 

* 

Length 

pt  Is  m 

Depth 

1  7  <lt  III 

Height 

'  mi  in 

Rack  MoutiiuMc 

length 

|o  nn  H, 

Depth 

r  tin  m 

Mcirht 

"  nn  m 

Baud  Rate  iSw  itc  h  Sc!-.  .  • . i ■  ■ ;  - 1 

IP’.  ;  so.  -Mil  - .  ; ; 

ui  i  ixmi  ..  \  nr ,,  ii » 

FUNCTIONAL  DESCRIPTION 

The  MbStki  i.\(  >Re  iser.  illustrated  in  figure 


ol  Puts  li  e  IXORciser  mav  he  e.isilv  tailored  to  mccl 
tlie  user's  needs  u,  r i > c  Je 'ten  e.nvi  development  ot  his 
sv  siem.  I ( s  in.  dtilar  design  revluees  the  time  required  to 
develop  .1  s\ste;n  and  at  me  s.iiv.e  time,  piovides  treat 
tie v i hi ht s  in  contiguring  jr.  emulation  (tunetion.il  rep¬ 
resentation)  ot  the  user's  sv stem,  lire  LXORciscr’s 
EXhue  firmware.  through  its  dehue  and  program  eontrol 
teatures.  minimize-.  the  tune  required  to  develop  user's 
sv stems.  ’I  he  1  Xbug  iiimwarc  provides  the  LXOReiser 
w  uh  the  capability  to: 

•  Display  the  eontents  of  the  MPU  registers 

•  Step  through  the  progiam 

•  Trace  through  user’s  progtariis  to  ioeate  prohlem  areas 

•  Stop  the  proeram  on  a  seleeted  proeram  step 

•  Provide  an  oscilloscope  trigger  signal  on  a  seleeted 
program  step 

•  Abort  it  on;  the  user's  program  and  return  to  the  LX  hug 
eontrol  program  on  command 

•  Reinitialize  the  LXOReiser  or.  eommand 

•  Change  the  eontents  of  memory 


The  user  eommunieates  vv  uh  the  LXOR.  iser  in 

ojl;*  l ‘A  v>  U  ;:\  x 

0  v.  ix>  I  ; -A  * 'I  I  i  'l  li/IliJiliai 

•  'through  the  LXOReiser  Iron!  panel  controls  and  indi¬ 
cators 

The  teiminal  device  permits  the  u-cr  to  com¬ 
municate  diicitlv  wiih  the  I. XOReiser's  LX  hug 
Lirmwaie  The  1  XOReiser's  it  out  panel  pcrtnits  the  user 
to  appiv  power  to  the  I  X( 'Reiser,  to  abort  (out)  the 
LXOReiser  Iron;  a  routine.  ..r.d  to  miital./e  and  restart  the 
LXOReiser.  The  1  XOReiser's  unique  Horn  pircl  was 
designed  to  incorporate  inline  1  X <  iKciser  options  such  as 
data  keys  and  displays. 

1-5  BASIC  EXORciser  SYSTEM  (FIGURES 
1-2  AND  1-3) 

The  haste  1  X(  iRet-er  iMo'sSRTi  e  moists  of 
the  MI’l  Mv'dule.  the  Debug  Module,  tiie  Batin  Rate 
Module,  the  Power  Supply .  and  the  chassis.  1  It  esc  mod¬ 
ules  are  bn: 1 1  around  the  Mb'-ou  Mieiosompuret  Lanttiy 
id  putts  iMCt'stM  Mrcioproeessing  l Hit.  MCl'.'OU 
Peripheta!  Intettaec  Adapter.  MO-'b' I  .-Vo m .‘notions 
Conimumeatiotis  Intel  face  Ad.rprcr.  NK MuS 1 1 1  Random 
Access  Memorv.  and  MC'MOS.'U  Read  Only  Memorv 
devices). 
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Electrocardiogram  Data  Reduction 
FKG  Data  Compression  Source  Encoding 
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FKG  data  compression  techmeues  v>ero  investigated  for 
potential  real  time  i  mplrr.ontation  on  an  h  bit.  Motorola  f.  SOf! 
microprocessor.  Per; e  a  r  c  n  i.  r. <i  i  c a  t  o ri  o n  t  r  c r v  rcducti  o n 
transform  technieuo  such  as  the  ['art  Fourier  r'ranr/  orn  and 
the  discrete  Karhunen-l.oc-vc  Trans, form  were  not  f  <  nr  i.ble  for 
implement.!  t  j  on  on  the  <>  TOO .  Tv:o  red undone v  rcductir.ji  (!:P) 
techniques  (TO], A!'  and  DC-WSF.)  at  i  I  i  sire  2nd  order  o'  i'fr  >■<  "a- 
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operations  in  conjunction  v.’ith  variable  length  encodi  nn  wore 
st''dicd  i ;  (]ft.:i'i.  fmv  eh  \  .  .  - g  ,  • ;  .  t 

' ■ .....  i;i  vi'.  i.‘  .  iv  i.uVv,  Annie; 

revealed  compression  ratios  ranging  from  1.25:1  to  2.26:1. 
Investigation  of  the  poor  performance  of  the  com press  ion 
algorithm  showed  significant  degradation  of  the  2nd  order 
difference  "decor  relator"  due  to  a  noisy  collection 
environment.  It  was  concluded  that  real  time  EKC  data 
compression  is  feasible  on  the  6  P  0  0  but  that  time 
compression  techniques  which  store.'  a  zero  value  sequence 
counter  versus  the  value  of  zero  are  not  efficient  in  a  high 
noise  environment. 


